Question

自2013年以来，我已经在大型交易所下载了每个比特币交易的清单。我现在看到的是：

for (auto &p: arrP1) sum += p;

我正在尝试使用 R 中的数据，但是当我运行Time Price Volume 1 2013-03-31 22:07:49 93.3 80.628518 2 2013-03-31 22:08:13 100.0 20.000000 3 2013-03-31 22:08:14 100.0 1.000000 4 2013-03-31 22:08:16 100.0 5.900000 5 2013-03-31 22:08:19 100.0 29.833879 6 2013-03-31 22:08:21 100.0 20.000000 7 2013-03-31 22:08:25 100.0 10.000000 8 2013-03-31 22:08:29 100.0 1.000000 9 2013-03-31 22:08:31 100.0 5.566121 10 2013-03-31 22:09:27 93.3 33.676862时，我的计算机功能不足以处理它。我正在尝试将其转换为如下格式（一天的价格行动）：

getSymbols(BTC_XTS)

我是 R 的新手，任何回复都会非常感谢！

Answer 1

当你说[你]运行getSymbols(BTC_XTS)＆＃34;时，你的计算机功能不足以处理它时，我不知道你的意思。 getSymbols检索数据...为什么需要检索已有的数据？

此外，您没有经过调整的关闭数据，因此输出中不可能有Adj.Close列。

您可以通过将输入数据强制转换为xts并在其上调用to.daily来获得所需内容。例如：

require(xts)
Data <- structure(list(Time = c("2013-03-31 22:07:49", "2013-03-31 22:08:13", 
"2013-03-31 22:08:14", "2013-03-31 22:08:16", "2013-03-31 22:08:19", 
"2013-03-31 22:08:21", "2013-03-31 22:08:25", "2013-03-31 22:08:29", 
"2013-03-31 22:08:31", "2013-03-31 22:09:27"), Price = c(93.3, 
100, 100, 100, 100, 100, 100, 100, 100, 93.3), Volume = c(80.628518, 
20, 1, 5.9, 29.833879, 20, 10, 1, 5.566121, 33.676862)), .Names = c("Time", 
"Price", "Volume"), class = "data.frame", row.names = c(NA, -10L))
x <- xts(Data[,-1], as.POSIXct(Data[,1]))
d <- to.daily(x, name="BTC")

将交易清单转换为R中的每小时/每日价格

1 个答案: