R语言代写 R语言编程代写 Pstat 160B Programming assignment 1 -代写R语言
发布时间:2021-08-03 23:34:27浏览次数:
(Sarantsev 160 Notes, Problem 21.16 page 119) Simulate 1000 times the first 50 jumps of a Poisson process (Nt)t 0 with intensity= 2. Calculate the empirical expectationE[N 1 N 2 ], and compare it with the true value.(Dobrow, Problem 6.44 page 264) Investors purchase $1000 dollar bonds at the random times of a Poisson process with parameter. If the interest rate isr, then the present value of an investment purchased at timetis 1000ert. Then the expected total present value of the bonds purchased by timetis 1000(1ert)r. Simulate the expected total present value of bonds if the interest rate is 4%, the Poisson parameter is= 50, andt= 10. Compare with the exact value.Compound Poisson process. We modify the Poisson process to let it jump not only by 1 upward, but in a more general way. Define a sequence of i.i.d. (independent identically distributed) random variablesZ 1 ,Z 2 , ,independent of (Nt)t 0. Then a compound Poisson process is defined as Ct=Ntk=Zk.It starts fromC 0 = 0, then waits timeX 1 and jumps toCX 1 =Z 1. Next, it waits additionaltimeX 2 (for the total timeS 1 =X 1 +X 2 ) and jumps toCS 1 =Z 1 +Z 2 , then waits timeX 3and jumps toCS 3 =Z 1 +Z 2 +Z 3 , etc. For a Compound Poisson process the mean and thevariance are given by:E(Ct) =E(Nt)E(Zk)V ar(Ct) =E(Nt)V ar(Zk) +V ar(Nt)(E(Zk))^2(Sarantsev 160 Notes, Problem 21.17 page 119) Simulate 1000 times the first 50 jumps of acompound Poisson process (Ct)t 0 with incrementsZ 1 ,Z 2 ,...distributed asN(2. 5 ,4), andintensity= 0.5. Use this to find empirical valueV ar(C 4 ), and compare this with the truevalue.1 of 1