- 在线时间
- 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;
' ]% }8 P! M& z8 M. g, L6 ~, l5 enx=50;
, I# z$ \3 m' o" p2 Sny=30;
* T/ C7 B2 t3 m+ whx=pi/nx;
- c, M# }# v2 h8 @/ U3 n! Gx=linspace(0,pi,nx+1);
, l9 N! r1 e! h7 e/ |y=linspace(0,pi,ny+1);
: `! v6 I9 ?' h' y6 Z5 P7 ~" F) L4 ix_plus_h=x+hx.*ones(1,nx+1);8 O& D' n. P; m+ {" _
x_minus_h=x-hx.*ones(1,nx+1);
1 N4 [4 b6 k: Q) Nfor i=1:nx+1, ~' f E/ Y& N/ Y7 {. ~& A$ N
for j=1:ny+1
1 k Q2 i, H* z, w" v 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)
( r# j* m7 C$ N1 U end;5 U5 [0 w3 B$ T" a
end;1 B; ~. X- j7 Y0 N4 k
[xx,yy]=meshgrid(x,y);, z1 r6 ^0 h% U3 C: e1 I. r
surf(xx,yy,f_xx);
$ n, q( R; i9 _title('partial derivative w.r.t.xx')
+ U9 I. U# v" J* u3 H+ b,
" j1 ~/ _* U* y5 z+ f% O; U I. U+ H$ l7 L$ h; J6 D: A
另开一个f9文件,8 ~: d& n {+ e1 V) k
function l=f9(x,y)/ A5 y- H$ u4 C" i, K
l=exp(sin(x-y));
4 T: T% E8 M: c" B: u7 `; I1 e* Y, n2 E7 l% l# |8 ?% A. w; I
2 U' Q8 m% _% c9 I! \/ `- w$ f
然后出来说错误了,- C5 o) @. O! E( T8 d0 O9 L& _$ h
??? Input argument "x" is undefined.4 d w& f) c1 U# F* D3 g0 U6 C
$ S5 P9 Q5 j0 E9 C9 Q2 v
Error in ==> f9 at 2+ Y" x7 j0 ~" b- n: X+ z# h0 q6 ~: Y
l=exp(sin(x-y));
8 J1 O" G' u& @8 w- ?+ h: M- M, tError in ==> partial_derivxx at 11
- I4 e0 Q% s) b, n! T+ W; B/ h! _, ^ f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2);
K* a h( v9 y7 k" V
0 R R% Y) n# i4 C M! L各位要怎么改才对呢 |
zan
|