- 在线时间
- 0 小时
- 最后登录
- 2010-3-3
- 注册时间
- 2010-2-19
- 听众数
- 2
- 收听数
- 0
- 能力
- 0 分
- 体力
- 52 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 20
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 8
- 主题
- 3
- 精华
- 0
- 分享
- 0
- 好友
- 0
升级   15.79% 该用户从未签到
- 自我介绍
- 追求完美,强迫症。
 |
clear all;# `0 y' t. h, w* R7 O3 I
nx=50;
0 N- A" F8 k$ R" d) H Nny=30;& ^& h; ] ] e2 a r8 ~/ `1 ^
hx=pi/nx;
, `3 H: b8 R' d7 fx=linspace(0,pi,nx+1);
- p; L8 U- \- N! R6 j+ X# N fy=linspace(0,pi,ny+1);
6 i; w4 S* n9 Y% Lx_plus_h=x+hx.*ones(1,nx+1);
8 B+ W5 f& X. o( ex_minus_h=x-hx.*ones(1,nx+1);* j7 K- y0 ~) g& r% Y" m, y. j2 Q
for i=1:nx+1; @1 I% ^3 ^5 A- b6 ]6 m7 w' M
for j=1:ny+1
# H5 v- `0 _& U5 L f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2); %原式f(x+hx,y)-2f(x,y)+f(x-hx,y)./(hx^2)
6 X$ [ n, K8 ~( F end;- I1 u' x% ]3 k) ?( f+ v: \! [
end;
. N1 s: `) S% A* z[xx,yy]=meshgrid(x,y);
6 ]6 |6 \( \) _% R3 Esurf(xx,yy,f_xx);
3 {# P! I* g7 l" s$ dtitle('partial derivative w.r.t.xx')4 g5 Q. ?1 W9 _
,; T2 q3 ?# _- x1 ?! W6 r+ _+ n
. h: }; C! t4 ?; K, ^
另开一个f9文件,7 A6 T/ G; {+ e2 \7 ?
function l=f9(x,y)
4 C, A( q& |2 r7 e$ q! Hl=exp(sin(x-y));
" a- c/ ~% o& M+ y' f @0 T/ L4 E! e
) h) p/ ~" X, L然后出来说错误了,
I( r0 F2 K& l$ d??? Input argument "x" is undefined., F6 o9 O0 Y: O( s, P; s
! N1 U# {1 @; W! _# L/ V
Error in ==> f9 at 2# @ V& K C8 A2 a0 j7 |& q7 e
l=exp(sin(x-y));/ Y1 o! s; p( z6 ?
Error in ==> partial_derivxx at 111 c+ P0 I. e& t, f9 r' `: F
f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2);" e+ O) T, v! T9 @& A0 G4 t
4 B6 J7 S5 ^' K! P' Z4 m
各位要怎么改才对呢 |
zan
|