1
Я получаю объект xts, получая некоторые произвольные числа, и собираю скорректированный столбец данных из ниоткуда. Что мне не хватает?Данные объекта и данные объекта data.frame, похоже, вообще не совпадают
library(quantmod)
DIB <- read.table(text="Date Symbols Open High Low Close Volume
2015-07-05 DIB 6.81 6.87 6.80 6.83 587524
2015-07-06 DIB 6.75 6.86 6.74 6.82 1839035
2015-07-07 DIB 6.80 6.84 6.78 6.80 3206400
2015-07-08 DIB 6.84 6.85 6.75 6.85 5069482
2015-07-09 DIB 6.82 6.82 6.74 6.78 1644686
2015-07-12 DIB 6.92 6.94 6.80 6.80 2183164", header=TRUE, as.is=TRUE)
write.csv(DIB, "DIB.csv", row.names=FALSE)
getSymbols(Symbols="DIB", env=globalenv(), return.class="xts", extension="DIB.csv")
# [1] "DIB"
head(DIB)
# DIB.Open DIB.High DIB.Low DIB.Close DIB.Volume DIB.Adjusted
# 2010-06-07 2.02 2.04 2.02 2.04 1318700 1.39143
# 2010-06-08 2.05 2.07 2.02 2.03 1647000 1.38461
# 2010-06-09 2.05 2.06 2.02 2.02 1923600 1.37779
# 2010-06-10 2.03 2.03 2.00 2.00 2485100 1.36415
# 2010-06-14 2.05 2.06 2.03 2.05 1946800 1.39825
# 2010-06-15 2.02 2.03 2.00 2.02 4991600 1.37779
@joshua_ulrich Большое спасибо. Вы очень помогли – riskmaverick
@ riskmaverick: Добро пожаловать. См. [Что делать, если кто-то отвечает на мой вопрос?] (Http://stackoverflow.com/help/someone-answers). –