
Last chance! 50% off unlimited learning
Sale ends in
table.Distributions(R, scale = NA, digits = 4)
StdDev.annualized
skewness
kurtosis
data(managers)
table.Distributions(managers[,1:8])
require("Hmisc")
result = t(table.Distributions(managers[,1:8]))
textplot(format.df(result, na.blank=TRUE, numeric.dollar=FALSE, cdec=c(3,3,1)),
rmar = 0.8, cmar = 2, max.cex=.9, halign = "center", valign = "top",
row.valign="center", wrap.rownames=20, wrap.colnames=10,
col.rownames=c("red", rep("darkgray",5), rep("orange",2)), mar = c(0,0,3,0)+0.1)
title(main="Portfolio Distributions statistics")
Run the code above in your browser using DataLab