Когда я запускаю функцию ниже, она возвращает ошибку «нет функции, из которой можно вернуться, переходя на верхний уровень»
Мне кажется, что я не могу найти ошибку, так как функция кажется правильно структурированной.
Все параметры определены, кроме изменяющегося срока погашения, на основе TTM, который представляет собой список значений.
Не могли бы вы помочь мне понять сообщение об ошибке?
Condor_strategy <- function (TTM) {
result = c()
for (i in 1:length(TTM)){
maturity = TTM[i]
a = MCAsianOptionPricer(maturity, K2,spot, stdv, Rf, 0, 0, 1, 10000, maturity * 365)
b = MCAsianOptionPricer(maturity,K4, spot, stdv, Rf, 0, 1, 1, 10000, maturity * 365)
c = MCAsianOptionPricer(maturity, K1,spot, stdv, Rf, 0, 1, 1, 10000, maturity * 365)
d = MCAsianOptionPricer(maturity, K3, spot stdv, Rf, 0, 1, 1, 10000, maturity * 365)
result = append(result, a-b-c-d)
}
return(result)
}
> dput(head(TTM))
c(0.004, 0.008, 0.012, 0.016, 0.02, 0.024)
Error in append(result, a - b - c - d) : object 'a' not found
>
> }
Error: unexpected '}' in " }"
> return(result)
Error: no function to return from, jumping to top level
> }
Error: unexpected '}' in "}"
>