a***u 发帖数: 72 | 1 第一个例子,
定义吧:
functmp0[y_,t_]:=Block[{x},
NIntegrate[ g(x,y,t), {x,-Infinity,Infinity} ]/
NIntegrate[ h(x,y,t), {x,-Infinity,Infinity} ]
]
f[t_]:=Block[{y},
NIntegrate[functmp0[y,t],{y,-Infinity,Infinity}]
]
Plot[f[t],{t,tmin,tmax}];
NIntegrate[ NIntegrate[ x+y, {x,0,1} ], {y,0,1} ] 简单
NIntegrate[x+y,{x,0,1},{y,0,1}];
Solve[ x + NIntegrate[x+y,{y,0,1}] == 1, x ] 不好
定义:
functmp1[x_]:=Block[{y},
-1+x + NIntegrate[ x+y, { |
|