## data -
Data = SMALLCAP.RET
Data = Data[, c("BKE", "GG", "GYMB", "KRON")]
Data
## spec -
Spec = portfolioSpec()
setTargetReturn(Spec) = mean(colMeans(Data))
Spec
## constraints -
Constraints = "LongOnly"
Constraints
## efficientPortfolio -
efficientPortfolio(Data, Spec, Constraints)
## tangency Portfolio -
tangencyPortfolio(Data, Spec, Constraints)
## minvariancePortfolio -
minvariancePortfolio(Data, Spec, Constraints)
Run the code above in your browser using DataLab