многочлен Ньютона

Форум пользователей пакета Maple

Модератор: Admin

Кли
Сообщения: 116
Зарегистрирован: Пт ноя 04, 2016 4:54 pm

многочлен Ньютона

Сообщение Кли » Ср ноя 28, 2018 11:52 pm

Почему у меня не выводит значения разделенных переменных?

Код: Выделить всё

restart;
with(CurveFitting):
x:=[-1,0,1,2,3];
y:=[17,7,5,11,49];
n:=5:             
for i from 1 to n do
f[0][i]:=y[i]:
end do;
for k from 1 to n-1 do
for i from 1 to n-k do
f[k][i]:=(f[k-1][i+1]-f[k-1][i])/(x[i+k]-x[i]):
end do:
end do;
N:=f[0][1]: w:=1:
for k from 1 to n-1 do
w:=w*(t-x[k]):
N:=expand(w*f[k][1]+N):
end do;

или как-то иначе надо реализовать?

Kitonum
Сообщения: 2050
Зарегистрирован: Ср дек 31, 2008 1:55 pm
Откуда: г. Пенза

Re: многочлен Ньютона

Сообщение Kitonum » Чт ноя 29, 2018 2:26 am

Выполните printlevel:=2; перед двойным циклом.

Кли
Сообщения: 116
Зарегистрирован: Пт ноя 04, 2016 4:54 pm

Re: многочлен Ньютона

Сообщение Кли » Чт ноя 29, 2018 8:05 am

спасибо, заработала, скажите, для чего эта команда?

Kitonum
Сообщения: 2050
Зарегистрирован: Ср дек 31, 2008 1:55 pm
Откуда: г. Пенза

Re: многочлен Ньютона

Сообщение Kitonum » Чт ноя 29, 2018 9:57 am

Почитайте справку ?printlevel , там всё подробно написано.