统计模拟及其R实现学习（1）

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

•非齐次poison过程模拟
nonpoisson_process=function(T,lambda,lambdat){
• i=0;s=0;t=0
•repeat{
• u=runif(1)
•t=t-log(u)/lambda
•if(t>T) break
• u1=runif(1)
•  if(u1<=lambdat(t)/lambda){
•  i=i+1
•  s[i]=t
•  }
•}
•list(s=s,I=i)
•}
•lambdat=function(t)
•nonpoisson_process(5,2)

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：统计模拟 R实现 function poisson Process 统计