我目前正在研究R并买了一本书。这里有一些代码,它曾用于Rstudio和Visual Studio RTVS。
以下代码绘制图表
frontier <- function(assets) {
return <- log(tail(assets, -1) / head(assets, -1))
Q <- cov(return)
n <- ncol(assets)
r <- colMeans(return)
Q1 <- rbind(Q, rep(1, n), r)
Q1 <- cbind(Q1, rbind(t(tail(Q1, 2)), matrix(0, 2, 2)))
rbase <- seq(min(r), max(r), length = 100)
s <- sapply(rbase, function(x) {
y <- head(solve(Q1, c(rep(0, n), 1, x)), n)
y %*% Q %*% y
})
plot(s, rbase, xlab = 'Return', ylab = 'Variance')
}
突然之间,它不再是图形。 我使用了jupyter笔记本,它确实在网上工作。我怀疑RStudio的内存有问题,但我不能肯定地说。 我应该重新安装Rstudio吗? 谢谢, 纳温