## data -
Data = SMALLCAP.RET
Data = Data[, c("BKE", "GG", "GYMB", "KRON")]
Data
## spec -
Spec = portfolioSpec()
setType(Spec) = "CVaR"
setSolver(Spec) = "solveRglpk"
setTargetReturn(Spec) = mean(Data)
Spec
## constraints -
Constraints = "LongOnly"
## solveRglpk -
solveRglpk(Data, Spec, Constraints)
Run the code above in your browser using DataLab