Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
braverock
GitHub Repository: braverock/portfolioanalytics
Path: blob/master/sandbox/RFinance2014/data/parse_edhec.R
1433 views
1
library(xts)
2
3
df <- read.table("data/edhec.csv", header=TRUE, as.is=TRUE, sep=";")
4
head(df)
5
6
edhec <- xts(apply(df[,-1], 2, function(x) as.numeric(gsub("%", "", x))) / 100, as.Date(df[,1], format="%d/%m/%Y"))
7
save(edhec, file="edhec.rda")
8
# load("edhec.rda")
9
# head(edhec)
10
# library(PerformanceAnalytics)
11
# data(edhec)
12
13