wolfram-mathematica - いくつかのポイントで関数を評価する

Question

ポイント（1、-2）でf [x、y] =-4 x + x ^ 2-4 y --y^2を評価したい。（2、-3）; （3、-2）; （2、-1）。

Outerを使ってみましたが、どういうわけか実際の値がわかりません。ヘルプ。

Answer 1

Mathematica には関数を定義する特定の方法があることを思い出してください．あなたの場合、それはf[x_,y_]:=-4 x + x^2 - 4 y - y^2. f[1,-2]次に、単になどを使用できます。

Answer 2

おそらく、「純粋な」関数の使用を検討してください。例えば：

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

与える

{1, -1, 1, -1}

Answer 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

Answer 4

Applyやのような関数を使用Mapして、ポイントのリストで関数を評価できます。たとえば、

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