我有一个包含3列的比特币时间序列数据的数据框:日期,收盘价(收盘价)和收益。
> head(BTC.USD)
# A tibble: 6 x 3
Date Close Return
<date> <dbl> <dbl>
1 2015-12-31 430. NA
2 2016-01-01 434. 0.940
3 2016-01-02 434. -0.0622
4 2016-01-03 431. -0.696
5 2016-01-04 433. 0.608
6 2016-01-05 431. -0.489
现在,我想计算退货的标准差。 我使用了基本功能,此功能有效:
> sd(BTC.USD$Return, na.rm = TRUE)
[1] 4.10426
现在,我想将其转换为“管道”形式,以便例如将其实现为apply-function。但这不起作用:
library(tidyverse)
> BTC.USD %>% sd(Return, na.rm = TRUE)
Error in sd(., Return, na.rm = TRUE) : unused argument (Return)
有人可以帮我吗?