Подскажите, пожалуйста, если вы видите, что что-то не так с моим кодом:
GMVPort=timeSeries(cumprod(GMVRetFac),charvec = names (GMVRetFac) )
CVARPort=timeSeries(cumprod(CVARRetFac),charvec = names (CVARRetFac))
## Plotting of portfolio values
ylims=range(cbind(GMVPort, CVARPort))
plot (GMVPort, ylim = ylims , xlab = "",ylab = "Portfolio Value (Index)")
lines (CVARPort, col = "blue")
legend(" topleft ",legend = c ( "Minimum−Variance","Minimum−CVaR" ),col = c("black" , "blue") , lty = 1)
## Relative performance
RelOutPerf=((CVARPort−GMVPort)/GMVPort)∗100
я получаю сообщение с неожиданным токеном для - и * для последней строки
Любая идея?
Спасибо