根据日期更新 XTS 对象中的列值
Update column value in XTS object based on date
SCA-B.ST.Open SCA-B.ST.High SCA-B.ST.Low SCA-B.ST.Close BOUGHT
2008-01-14 104.50 105.00 101.50 102.75
2008-01-15 102.50 102.50 98.25 99.50
我在 R 中制作了一个包含一些股票信息的 XTS 对象。我还制作了一份手动列表(在纸上),其中列出了我何时进入一个包含值 "B" 或 [=16= 的股票的位置].
如何根据 XTS 对象提供的日期索引将 "B" 或 "S" 值插入到 "BOUGHT" 列中?
你可以简单地做(这里我假设你的xts被称为data
):
# add col with 'NA' values
data$BOUGHT <- NA
data[as.Date("2008-01-15"),"BOUGHT"] <- "B"
# check/print
data[as.Date("2008-01-15"),"BOUGHT"]
输出:
> # add col with 'NA' values
> data$BOUGHT <- NA
> data[as.Date("2008-01-15"),"BOUGHT"] <- "B"
> # check/print
> data[as.Date("2008-01-15"),"BOUGHT"]
BOUGHT
2008-01-15 "B"
SCA-B.ST.Open SCA-B.ST.High SCA-B.ST.Low SCA-B.ST.Close BOUGHT
2008-01-14 104.50 105.00 101.50 102.75
2008-01-15 102.50 102.50 98.25 99.50
我在 R 中制作了一个包含一些股票信息的 XTS 对象。我还制作了一份手动列表(在纸上),其中列出了我何时进入一个包含值 "B" 或 [=16= 的股票的位置].
如何根据 XTS 对象提供的日期索引将 "B" 或 "S" 值插入到 "BOUGHT" 列中?
你可以简单地做(这里我假设你的xts被称为data
):
# add col with 'NA' values
data$BOUGHT <- NA
data[as.Date("2008-01-15"),"BOUGHT"] <- "B"
# check/print
data[as.Date("2008-01-15"),"BOUGHT"]
输出:
> # add col with 'NA' values
> data$BOUGHT <- NA
> data[as.Date("2008-01-15"),"BOUGHT"] <- "B"
> # check/print
> data[as.Date("2008-01-15"),"BOUGHT"]
BOUGHT
2008-01-15 "B"