[M.A.D.M.A.N.]

Подскажите, каким образом можно быстро расянуть массив данных (например увеличить вдвое). В матлабе делается функцией spline, каким образом её можно реализовать на дельфи, что-то адекватных решений гугл не выдал по запросу "delphi интерполяция сплайнами".

[Aristarh Dark]

Код:

SetLength(my_array,Length(my_array)*2)

уже отменили?

[M.A.D.M.A.N.]

Нененен, не изменение длины массива, а растяжение еще и данных в нем (например было 1 2 3 растянули в двое, стало 1 0 2 0 3 0, надо заместо нуликов подставить значения, в данном случае 1.5, 2.5, 3.5), т.е. кубическим сплайном заполнять образующиеся пустоты.

Вроде нашел пример кубического сплайна на дельфи.

[angvelem]

На ум приходит только создать массив двойной величины и поочередно заполнять: 0-значение, полу-сумма 0+1-го, 1-значение, полу-сумма 1+2-го и так до упора.

[M.A.D.M.A.N.]

Через кубический сплайн надо, ибо если напрямую - уродство какое-то получится.

Разбираю пример кубического сплайна от KOOL, довольно ужасно написано.

[angvelem]

Где в KOOL-е это описано?

[M.A.D.M.A.N.]

http://www.delphisources.ru/pages/so...rpolation.html

Автор KOOL я имел ввиду.

[M.A.D.M.A.N.]

Короче все, тема себя исчерпала, разобрался. Можно закрывать/удалять.