在几个点评估功能

时间:2012-04-26 01:17:08

标签: wolfram-mathematica

我想在点(1,-2)处评估f [x,y] = - 4 x + x ^ 2 - 4 y - y ^ 2; (2,-3); (3,-2); (2,-1)。

我尝试使用 Outer ,但由于某种原因它没有给我实际值。帮助

4 个答案:

答案 0 :(得分:9)

请记住,Mathematica有一种特定的定义函数的方法。在你的情况下,它将是f[x_,y_]:=-4 x + x^2 - 4 y - y^2。然后你可以简单地使用f[1,-2]等。

答案 1 :(得分:5)

也许考虑使用'纯'功能。例如:

-4 #1 + #1^2 - 4*#2 - #2^2 & @@@ {{1, -2}, {2, -3}, {3, -2}, {2, -1}}

给出

{1,-1,1,-1}

答案 2 :(得分:3)

以下是主题的一些变体:

Clear[f]

f[{x_, y_}] := -4 x + x^2 - 4 y - y^2
points = {{1, -2}, {2, -3}, {3, -2}, {2, -1}};
Map[f, points]

{1,-1,1,-1}

f[x_, y_] := -4 x + x^2 - 4 y - y^2
f[1, -2]

1

f = Function[{x, y}, -4 x + x^2 - 4 y - y^2];
f[1, -2]

1

答案 3 :(得分:2)

您可以使用ApplyMap等函数来评估点列表中的函数,例如

f[x_, y_] := -4 x + x^2 - 4 y - y^2 

pts =  {{1, -2}, {2, -3}, {3, -2}, {2, -1}};

Apply[f, pts, {1}]

(* out: {1, -1, 1, -1} *)

或使用@@@作为Apply[ ...., {1}]

的简写
f @@@ pts