Mathematica：如何评估此功能？

问题描述

我需要以2D形式评估函数，但它具有三个未知数，两个参数（x，y）和alpha。我需要评估{0,100}之间的x和y，而{0,1}之间的alpha。 函数为：f（x，y）= x ^（a）* y ^（1-a） 谢谢！

解决方法

不确定“以2D评估功能”是什么意思。一些选项

f[x_,y_,a_] := x^a y^(1 - a)

生成a不同值的图

Table[Plot3D[f[x,y,a],{x,100},{y,PlotLabel -> "a = " <> ToString@a],{a,1,.1}] //
  Partition[#,UpTo[4]] & //
  Grid

生成轮廓

ContourPlot3D[f[x,1},Contours -> 5]