- 在线时间
- 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;+ B9 l; e' e3 r+ x- m, z- T
nx=50;
2 i! [5 b7 K* O, e! @ny=30;
" h Z' O4 }+ A* Z, t' x5 D6 h% jhx=pi/nx;
* W3 G; [7 l) [5 Z6 z% }: R% xx=linspace(0,pi,nx+1);
3 F8 m1 Y' D+ H: c9 u8 @. c( z2 p _5 y7 Cy=linspace(0,pi,ny+1);
$ q8 N/ M# o& I3 _x_plus_h=x+hx.*ones(1,nx+1);
9 N' r, \8 v3 F& a. {1 B% cx_minus_h=x-hx.*ones(1,nx+1);, X- h' f. i; w
for i=1:nx+1
0 u- \, a( {8 i* V$ M8 r+ f for j=1:ny+1
- K @% {* _8 ~ 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)
; Q- u9 }6 X+ m3 v; { end;
$ A4 I+ G; k* o! n% s% l3 `end;
0 f, ^8 J/ e# f- G[xx,yy]=meshgrid(x,y);) B0 @' q! K g5 u
surf(xx,yy,f_xx);& y* X3 ^* K o/ Y( A
title('partial derivative w.r.t.xx')7 t0 ] I, O5 q0 D; N& t
,: j# |7 Z9 T8 T$ T% {( a
4 A1 {, b+ e. B另开一个f9文件,
( K# h. `2 ^- f+ E! D; n" u9 E6 Mfunction l=f9(x,y)9 f0 Y7 u! A4 k: S* k! D
l=exp(sin(x-y));
- K% ^+ o9 ^; H" |- }( A/ x% R
7 b) F& {; \7 f9 \# X" A8 n7 B1 G8 y. h% _9 i0 s2 B# f! g2 y
然后出来说错误了,
6 T; n2 a! E. N??? Input argument "x" is undefined.9 M$ u& q) N0 u6 i/ T
2 Q- X! C( w7 ^% m% O* d+ S
Error in ==> f9 at 2+ a/ u9 J% s% G$ T8 Z x# G
l=exp(sin(x-y));
6 A; c9 y; Q% hError in ==> partial_derivxx at 112 ]. u1 S; \ L! c' X0 _- ]0 l
f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2);, D& ~# M& f* z, a' s# a' v& t
; m) C/ _0 t8 G/ [ [% T0 j, A) Z3 `各位要怎么改才对呢 |
zan
|