Возник вопрос по получению данных, с графика ниже. в чем суть; Есть значения по X, от 0 до 160, нужно, чтобы в экселе(рисунок справа), в зависимости от моего числа X(RBS RMR), мне выдавал результат Y. Т.е для значения 20 , рейтинг будет = 10, и так далее.
teomatau написал: как можно достовернее отрисовать
получить все необходимые данные. Вы хотите достоверно отрисовать график только на основании X, без Y? и как этот Y получить тоже не знаете? Нужна хотя бы исходная формула вычисления Y на основании X. Без этого ничего не выйдет, я думаю. Возможно туплю и ошибаюсь. Я просто откровенно не понимаю что мы вообще вычисляем.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
Есть значения в MPa, в зависимости от этих значений, смотря на кривую, мне необходимо выбрать рейтинг, для каждого значения. Например: Для значения 10 МПа, рейтинг будет составлять 5. для значения 20 МПа, рейтинг соотстветственно 10, и так далее. Мне нужна формула, чтобы при подставке значений МПа в столбик, мне рядом выдавало значение Рейтинга
Андрей VG, приветствую! А как вы это делали? Ни разу с подобным не сталкивался, но очень интересно
Особенно интересно, почему у обоих чисел хвосты: • как вы добились такой точности • почему не взяли целые числа X и рассчитали их соответсвия на Y или наоборот
Я бы просто закинул картинку в автокад и повторил оси (орто) и кривую (полилиния+сплайн+ручками). Потом можно бы было получать для любой точки X точку Y и наоборот…
UPD:нашёл программуи понял, откуда "хвосты" (сюрприз - не оттуда)
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
Привет, Алексей. В принципе, всё просто. Оцифровал график полилинией. Макросом сбросил координаты. Зная координаты точек в двух системах координат, пересчитал из одной в другую обычными формулами в столбцах F, G. По поводу точности - не стоит обольщаться. Обычно считается точность вычисления (округление результата) нужно делать в пределах полуширины линии.
Андрей VG, о, а макрос-то я и не заметил) не думал, что так можно — спасибо за науку!
Макрос получения координат
Код
Option Explicit
Public Sub getIt()
'===========================================================================================
Dim pShape As Shape, vOut() As Variant, pNode As ShapeNode, i&
Set pShape = ActiveSheet.Shapes(2)
ReDim vOut(1 To pShape.Nodes.Count, 1 To 2)
For Each pNode In pShape.Nodes
i = i + 1
vOut(i, 1) = pNode.Points(1, 1)
vOut(i, 2) = pNode.Points(1, 2)
Next pNode
ActiveSheet.Range("C2").Resize(pShape.Nodes.Count, 2).Value = vOut
End Sub
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
так выложил же выше. Но Jack Famous прав, лучше для оцифровки графиков использовать специальные программы. По крайней мере, задавая опорные точки, можно скорректировать искажения. А это нужно делать, если источник - скан.
правда - используйте программу. Для варианта от Андрея очень неплохо знать если не макросы, то хотя бы способы корректировки, т.к. например любое смещение полилинии означает, что нужен перевывод координат.
А вообще у него очень крутой метод использован - обязательно учту на будущее
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
Просто дело в том, что у меня будут входные данные, от 1 до 400, к которым нужно будет значение рейтинга. Я думал, что будет проще привязать к ним формулы, и при копирование данных, чтобы сразу присваивался рейтинг. Я так понимаю, в программе так не получится?