- 在线时间
- 34 小时
- 最后登录
- 2014-5-13
- 注册时间
- 2012-2-7
- 听众数
- 4
- 收听数
- 0
- 能力
- 0 分
- 体力
- 370 点
- 威望
- 0 点
- 阅读权限
- 30
- 积分
- 163
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 96
- 主题
- 5
- 精华
- 0
- 分享
- 0
- 好友
- 37
升级   31.5% TA的每日心情 | 无聊 2014-3-17 18:33 |
|---|
签到天数: 54 天 [LV.5]常住居民I
 群组: 学术交流B |
function f=p_judge(A,alpha)
$ y. _3 P9 V& b3 {7 @4 K, Ralpha=0.05;5 H; C3 c O, v4 u0 A) r2 Z8 E& A
% 本程序用于判别所给数据源在置信率为0.05时的概率分布形式。A的形式为n×1。
; R/ Q8 V* L) W& v& t- K+ b0 |7 {. pA=[1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1]';
- v n. T' Z6 j& H+ z[mu,sigma]=normfit(A);4 L- [- j& ]! U( g
p1=normcdf(A,mu,sigma);
2 d; O7 w) m' }[H1,s1]=kstest(A,[A,p1],alpha)0 z4 C7 f6 X' `- S2 Y: Z+ S, k
n=length(A);
7 [7 ?' Y# A/ Lif H1==0
( j( R: `# m9 k9 b# Y8 zdisp('该数据源服从正态分布。')
* a1 t1 r4 b1 g+ E6 p/ Lelse
r6 {' M: S. D3 y9 v; xdisp('该数据源不服从正态分布。') " _& T+ R) f, c
end, s' r0 l# g& b6 X# J
phat=gamfit(A,alpha);+ W7 D7 }% }4 K/ }
p2=gamcdf(A,phat(1),phat(2));/ `- W+ M% x, b# O; q% L7 ?
[H2,s2]=kstest(A,[A,p2],alpha)9 M9 O0 I- U9 s. A1 b: D; T5 [5 c
if H2==0* G8 k" C, a9 F( @
disp('该数据源服从γ分布。'); M5 e/ ?1 n: M1 {
else
# v f% H9 Y7 b1 h& Ydisp('该数据源不服从γ分布。')
$ q# W! c% J% Q1 S" ?# } F/ J4 p" gend) F' i: Y# @" y( c- t) ]- _+ L
lamda=poissfit(A,alpha);
: S# ~; g! J# K8 Zp3=poisscdf(A,lamda);
. a7 H, N2 E+ P# \: F[H3,s3]=kstest(A,[A,p3],alpha)* T: z' P4 _2 i8 x1 T, A2 H$ R* `+ m
if H3==05 ], C k( _# M( l; U
disp('该数据源服从泊松分布。')
4 b8 z3 x( W1 F+ eelse
! f# p9 ^5 f+ r; ^disp('该数据源不服从泊松分布。')
; f9 G: Y5 `( ? _end
9 n( e, j( S, [mu=expfit(A,alpha);7 ?3 a! j4 K, r
p4=expcdf(A,mu);
% G: v+ E" @: z8 |0 [% } p) v[H4,s4]=kstest(A,[A,p4],alpha)
- @4 c# L% Z, ~if H4==0& t3 K7 L- N. |5 S5 \8 A% Y
disp('该数据源服从指数分布。')
3 N, c& y8 a* K" y qelse
, ?& ~2 b& |9 y6 C Bdisp('该数据源不服从指数分布。')
N/ J( }7 w9 Eend
- J' l# J2 R, ~# q! l u" _[phat, pci] = raylfit(A, alpha)
/ n: \5 ~' ^& c/ p. Rp5=raylcdf(A,phat);
7 i2 ^$ m2 I- n1 a[H5,s5]=kstest(A,[A,p5],alpha)
$ B! U( G2 C% h: b) Mif H5==0
7 f9 y5 j% {) V y' T adisp('该数据源服从rayleigh分布。')
; x6 K; ~6 A" |1 pelse
2 q2 w" P* ^5 C0 ]( t+ S" [disp('该数据源不服从rayleigh分布。')- n* `4 I1 f) D0 Q) |/ E
end |
zan
|