pse=rep(0,Iter)
psa=rep(0,Iter)
for (j in c(1:Iter)) {
- P=rep(0, T)
- for (i in c(1:T)) {
- n=rnorm(1,0,1)
- temp = exp(r-0.5*(s)^2 + s*n)
- if(i>=2)
- P= P[i-1] * temp
- if(i==1)
- P=initPrice*temp
- }
- pse[j]=P[T]
- psa[j]=mean(P)
- } 错误于P = initPrice * temp : 更换参数长度为零 多谢多谢~
循环语句循环次数超出了应由的循环次数,if条件或者其他函数里没有值可以用了,检查下循环次数有没有出错
initPrice是哪里定义的。
你单步调试一下变量的值,看看
r语言我不会,顶你,祝你好运!