求助!已知两个函数分布,怎么画出二重积分图像。
mathematica吧
全部回复
仅看楼主
level 2
代码哪里有问题。
2023年03月23日 07点03分 1
level 2
\[Phi] = PDF[NormalDistribution[1, 0.5^0.5], x];
$Assumptions = y > 0;
g = PDF[GammaDistribution[10, 0.1], y];
\[Alpha] = 0.5;
\[Beta] = 0.9;
c = 6;
L = 8;
m = 40;
b = 95;
\[Tau] = 0.2;
\[Gamma] = 0.5;
$Assumptions = {f, Q} \[Element] Reals;
A = c Q + L \!\(
\*SubsuperscriptBox[\(\[Integral]\), \(0\),
FractionBox[\(f\), \(Q\)]]\(\((
\*FractionBox[\(f\), \(y\)] - Q)\) g \[DifferentialD]y\)\) + m f +
b (\[Alpha] - \[Beta] (\!\(
\*SubsuperscriptBox[\(\[Integral]\),
FractionBox[\(f\), \(Q\)], \(4\)]\(\((
\*SubsuperscriptBox[\(\[Integral]\), \(0\), \(f\)]x\ \[Phi] \
\[DifferentialD]x +
\*SubsuperscriptBox[\(\[Integral]\), \(f\), \(5/
9\)]f\ \[Phi] \[DifferentialD]x)\) g \
\[DifferentialD]y\)\) + \!\(
\*SubsuperscriptBox[\(\[Integral]\), \(0\),
FractionBox[\(f\), \(Q\)]]\(\((
\*SubsuperscriptBox[\(\[Integral]\), \(0\), \(y\ Q\)]x\ \[Phi] \
\[DifferentialD]x +
\*SubsuperscriptBox[\(\[Integral]\), \(y\ Q\), \(
\*FractionBox[\(f\), \(\[Gamma]\)] + \((1 -
\*FractionBox[\(1\), \(\[Gamma]\)])\) y\ Q\)]\((\((1 - \[Tau])\) \
\[Gamma]\ x + \((1 - \[Gamma] + \[Tau]\ \[Gamma])\) y\ Q)\) \[Phi] \
\[DifferentialD]x +
\*SubsuperscriptBox[\(\[Integral]\), \(
\*FractionBox[\(f\), \(\[Gamma]\)] + \((1 -
\*FractionBox[\(1\), \(\[Gamma]\)])\) y\ Q\), \(5/
9\)]\((\((1 - \[Tau])\) f + \[Tau]\ y\ q)\) \[Phi] \
\[DifferentialD]x)\) g \[DifferentialD]y\)\)));
Plot3D[A, {f, 0, 1}, {Q, 0, 2}]
2023年03月23日 08点03分 2
吧务
level 10
你这积分太难算了,考虑数值积分。
2023年03月26日 06点03分 4
请问数值积分怎么做
2023年05月15日 05点05分
@ddc小丸子ლ 文档搜
2023年05月15日 19点05分
1