- 在线时间
- 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;. C. N4 ?1 m5 m( E" i
nx=50;
. s0 P2 |6 h- }5 {3 J3 h% Eny=30;0 H v6 B! p7 e' x& f* D, `. H
hx=pi/nx;! w+ V+ o4 l/ o: @
x=linspace(0,pi,nx+1);- Q+ P( ] E! T" {: `
y=linspace(0,pi,ny+1);
5 K6 U! N# E) J0 e9 m+ Nx_plus_h=x+hx.*ones(1,nx+1);
8 S: {: O5 K$ r% cx_minus_h=x-hx.*ones(1,nx+1);4 K& g7 X' w& Y$ W% X
for i=1:nx+1/ t! R/ S0 n0 ?" f' ]4 g0 b% E
for j=1:ny+1
6 k+ C# ~- y- B ^; p( e 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); @0 A* e7 u s1 M. m
end;
0 T4 A0 s b" b1 r2 H; fend;0 A/ K n3 I/ K6 l# y! p+ H
[xx,yy]=meshgrid(x,y);
# B& `" S$ b" c5 x2 M4 B7 Jsurf(xx,yy,f_xx);/ a& l$ w, ~: B0 W/ M- s2 W
title('partial derivative w.r.t.xx')
7 J5 h9 F* ^0 n/ G q/ h: i- o,0 t, H( G c8 F9 Y3 @
6 D4 g; o! S1 \4 Z6 l, f! [
另开一个f9文件,. K& x; o6 M& N+ O/ N7 b$ S! s
function l=f9(x,y) s6 W* l( i; w' ^% ^! q, D. h
l=exp(sin(x-y));
8 H- S+ L* v8 U. L/ h4 N
( i! q$ a; b1 H) @+ \
# [7 N( ^% q5 i9 S) m, Q7 }然后出来说错误了,# I, }' g9 ]" u
??? Input argument "x" is undefined.5 q6 ~6 K4 x& F1 {- w ]. @
6 `, f/ N. ?6 C- \" i5 NError in ==> f9 at 2
( Q8 n S& t+ _, D2 m$ l/ q0 nl=exp(sin(x-y));
: x# \1 \- t) b1 ?2 q, h* `3 h8 `4 [0 RError in ==> partial_derivxx at 11
' H: b; V9 R- N) E* _" K3 o* o f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2);
! U. N. P; A8 {. F4 \* m' n- e% O. `3 C) J: L' W
各位要怎么改才对呢 |
zan
|