Использование Taylor ПОЛИНОМАХ в Maple Программная

Question

Я пытаюсь использовать полином Тейлора программно в Maple, но следующий, кажется, не работает ...

T[6]:=taylor(sin(x),x=Pi/4,6);convert(T[6], polynom, x); 
f:=proc(x) 
    convert(T[6], polynom, x); 
end proc; 
f(1); 

Все нижеуказанные не работают:

• f:=convert(T[6], polynom);
• f:=convert(T[6], polynom, x);
• f:=x->convert(T[6], polynom);
• f:=x->convert(T[6], polynom, x);.

Есть ли способ сделать это без копирования и вставки вывода преобразования в определение f?

Answer 1

Это также может быть естественно определить Т как функцию.

T:=y->subs(x=y,convert(taylor(sin(x),x=Pi/4,6),polynom)); 

T(1); 

Answer 2

Если я вас правильно понял, это выполняет то, что вы хотите:

f := proc(z) 
    local p :: polynom; 
    p := convert(T[6], polynom); 
    return subs(x = z, p) 
end proc 

Answer 3

Несколько ранее ответы, связанные с процедурами и подводные лодки будут делать всю серию Тэйлор вывод, а также преобразование в полином, для каждого входного сигнала. Это очень неэффективно.

Вам нужно всего лишь создать результат taylor и преобразовать в полином один раз. С этим результатом в руке вы можете создать оператор (с которым нужно действовать как можно больше входов, просто оценивая полином в точке, но без, чтобы пересчитать весь ответ Тейлора).

Ниже приведен способ создания процедуры f для оценки в любой заданной точке аргумента x. Он вычисляет (усеченный) ряд Тейлора и преобразует в полином только один раз.

> f:=unapply(convert(taylor(sin(x),x=Pi/4,6),polynom),x):