[VBA ] 想詢問如果要跑股價走勢怎麼設定
進去之後
要設定的參數有成長率跟波動率
Public Function mcasiancall(s, k, r, sg, t, n, m)
Dim st()
ReDim st(n)
st(0) = s
dt = t / n
temp2 = 0
For i = 1 To m
temp1 = 0
For j = 1 To n
randn = Application.WorksheetFunction.NormInv(Rnd, 0, 1)
st(j) = st(j - 1) * Exp((r - sg ^ 2 / 2) * dt + sg * Sqr(dt) * randn)
temp1 = temp1 + st(j)
Next
temp2 = temp2 + max(temp1 / n - k, 0)
Next
mcasiancall = Exp(-r * t) * temp2 / m
End Function
以上是選擇權的價格的設定
如果我要改成股票走勢
只有兩個參數 改成成長率跟波動率
要怎麼改比較適當
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.171.89.1