- 在线时间
- 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;7 n3 Z# e* ~- R
nx=50;
6 b7 s5 d# r6 F5 V' |ny=30;
+ h& M$ e, D* s' k0 Z9 lhx=pi/nx;
- s9 \ v# u# v5 U) ex=linspace(0,pi,nx+1);
2 t+ x1 a( R1 V5 J' L! S1 M+ f) dy=linspace(0,pi,ny+1);6 \7 Q3 A7 T* f3 ?
x_plus_h=x+hx.*ones(1,nx+1);# b( ]$ X) v! P0 W
x_minus_h=x-hx.*ones(1,nx+1);
7 B- F2 B2 h* l9 R2 lfor i=1:nx+15 D0 w5 y% E# g! Z% N
for j=1:ny+18 t; G! Y1 W8 V9 s, R x( v6 _0 b* n+ H
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 S# S8 C9 r5 E! t7 h, _7 z( z end;
& a9 n: W. L8 t- h$ m7 G. oend;; V3 X* W% G V$ ]" O7 z) v" I! ~
[xx,yy]=meshgrid(x,y);: H( j/ d* ?7 e$ _! Q( Y0 u8 t
surf(xx,yy,f_xx);
9 m. z9 ]( S i$ Y- ~( b: i6 _* Ntitle('partial derivative w.r.t.xx')$ F6 O0 U6 @5 q8 w2 j# x
,3 D! P% s3 D* z$ u8 T3 l7 t
) d3 h7 ^# a1 u, a另开一个f9文件,
4 I u$ l9 d2 e( C0 T' T+ mfunction l=f9(x,y)
: U' R* v6 b" v. e: |/ p* N7 zl=exp(sin(x-y));" P7 S$ b* ?" \" x$ q
3 o3 E) |* Y* a5 a+ _8 Y* _! ^9 f) C1 }) t) K. o, D
然后出来说错误了,
2 T8 h' d% _' _9 @% {5 ~??? Input argument "x" is undefined.
& D- l1 K. v: v: L& I) q8 E
I3 m% w! C% M9 R3 R& FError in ==> f9 at 2
# f5 [( _* O# j* d( f# Zl=exp(sin(x-y));
. F' s5 }/ l; F" t! m' O4 J; ~" TError in ==> partial_derivxx at 11( O4 B, z1 Y# p) g/ ^- p, f% j5 q
f_xx(j,i)=(f9(x_plus_h(i),y(j))-2*f9+f9(x_minus_h(i),y(j)))./(hx.^2);
* K: x8 w+ ]& z' v0 G6 d r
8 o9 N9 v. l+ b$ R: D& L$ O各位要怎么改才对呢 |
zan
|