Re: mathematica 提问 "integrand not numeri# Computation - 科学计算
a*u
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, {
定义吧：
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, {