预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共11页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

电子信息与通信工程学院 实验报告 实验名称非其次泊松过程课程名称随机信号分析 姓名顾康学号U201413323 日期6.13地点南一楼 成绩教师董燕 题目 ConsiderthenonhomogeneousPoissonprocesswithitsintensityfunctionspectifiedinExample2.3.6.(a)WriteaMATLABprogramtogenerate(stimulate)thefirsteightyarrivaltimes.(b)Givent=8(hours),writeaMatlabprogramtogenerateN(8)andthenthearrivaltimesintheinterval(0,8],drawtherespectivehistogramsshowinghour5yarrivalcounts. (a) 由定理设λ(t)≤λ,其中λ为一常数,而s1,s2,…,sn,…为参数λ的齐次泊松过程的事件发生的时刻,对每个si,以概率λ(si)/λ进行保留,以概率1-λ(si)/λ舍弃,由此得到的序列s(1),s(2),…,s(n),…是强度为λ(t)的非齐次泊松过程事件发生的时刻。 证明显然,s(1),s(2),…,s(n),…是s1,s2,…,sn, …的稀疏。 设A={非齐次泊松过程N(t)在(t,t+h]中有一个事件发生}, B={齐次泊松过程N(t)在(t,t+h]中有一个事件发生}, 则有P(AB)=P(B)P(A|B)=(λh+o(h))λ(t)/λ=λ(t)h+o(h), 由此可知从s1,s2,…,sn,…中选出的序列s(1),s(2),…,s(n),….满足非其次泊松过程的性质。根据定理,先产生齐次泊松过程事件发生的时刻,再按概率稀疏就得到非齐次泊松过程事件发生时刻,步骤如下. 产生参数λ的齐次泊松过程的T前事件发生的时刻s1,s2,…,sn. (2)产生(0,1)上的随机数xi,若xi≤λ(si)/λ,保留si,否则舍弃si. (3)将保留的si,分别记为s(1),s(2),…,s(k)并输 出即可. .CODE symstnamda namda=8.924-1.584*cos(pi*t/1.51)+7.897*sin(pi*t/3.02)-10.434*cos(pi*t/4.53)+4.293*cos(pi*t/6.04); size=1000;%产生{s}的多少 times=80;%到达次数 y=zeros(1,size); z=zeros(1,times); T=zeros(1,times); mu=34; fori=1:1:size x=rand(1); y(i)=-log(x)./mu;%产生{s} end fori=1:1:times forj=1:1:size x=rand(1); temp=subs(namda,'t',8+y(j)); ifx<temp/mu%筛选过程 z(i)=y(j); Break; end end end T(1)=0; fork=1:1:times fori=2:k T(i)=T(i-1)+z(i); end end plot(T) X=1:1:80; (b) 关于产生N(8),只需应用公式: P{N(t)=n}=exp(-λt)*(λt)^n/n! 而关于在(0,8]内的到达次数,原理与(a)相同,只需修改代码的边界条件。 (b).codepartⅠ times=8; z=zeros(1,100); forj=1:1:80; mu=int(namda,0,j/10); z(j)=exp(-mu)*(mu)^times/factorial(times); end plot(z) set(handles,'xtick',0:0.1:10); (b).codepartⅡ symstnamda namda=8.924-1.584*cos(pi*t/1.51)+7.897*sin(pi*t/3.02)-10.434*cos(pi*t/4.53)+4.293*cos(pi*t/6.04); size=1000;%产生{s}的多少 times=300;%更改到达次数 y=zeros(1,size); z=zeros(1,times); T=zeros(1,times); mu=20; fori=1:1:size x=rand(1); y(i)=-log(x)./mu;%产生{s} end fori=1:1:times forj=1:1:size x=rand(1); temp=subs(namda,'t',8+y(j)); ifx