Question

Mathematica超简单的函数问题

angle[a_list, b_list] := Apply[ArcTan, (b - a)]
angle[{0, 0}, {1, 1}]

为什么得不出Pi/4的结果？

Answer 1

只要证：|arctanb-arctana|/|b-a|≤1
取f(x)=arctanx,则存在ε属于[a,b]使
f'(ε)=(arctanb-arctana)/(b-a)=1/(1+ε^2)
显然|f'(ε)|≤1
故原式成立

追问

令我汗颜~，

Answer 2

Apply[ArcTan, (b - a)]具体是一个什么函数？

追问

Mathematica是一个工程的数学软件

追答

哦，你的问题我看懂了，但是这个软件我没用过，不好意思...可能要查查是不是语法有什么问题。

追问

恩， 谢谢你的回答

Answer 3

angle[a_, b_] := Apply[ArcTan, (b - a)]
angle[{0, 0}, {1, 1}]

追问

为什么加了条件就不行了呢？

追答

angle[a_list, b_list]
不符合定义函数的格式要求。

追问

什么意思？
{0,0}，{1,1}不都是列表的么？