XFGsummary (R 2.13.1)

Descriptive Statistics

Download File

Sat, June 16 2012 by Dedy Dwi Prastyo

-


rm(list=ls(all=TRUE))
graphics.off()
summarize = function(x){
Minimum = apply(x,2,min)
Maximum = apply(x,2,max)
Mean = apply(x,2,mean)
Median = apply(x,2,median)
Std.Error = apply(x,2,sd)
table = cbind(Minimum, Maximum, Mean, Median, Std.Error)
print(table)
}
INAAA = read.table("XFGINAAA.dat")
INAAA = INAAA[,4:12]
colnames(INAAA) = c("3M", "6M", "1Y", "2Y", "3Y", "4Y", "5Y", "7Y", "10Y")
summarize(INAAA)