使用quantmod抓取GOOGL股价时无法提取日期列的解决方案咨询

嘿，这个问题我太熟悉了！用quantmod的getSymbols()抓取回来的股票数据是xts/zoo类型的时间序列对象——日期其实是它的行索引，不是普通的数据列，这就是你没法直接把它当列提取或用常规data.frame方式子集化的原因。下面给你几个实用的解决思路：

1. 转换为Data Frame，把日期转为单独列 #

如果你习惯用data.frame操作数据，可以把xts对象转成普通数据框，同时把索引提取为日期列：

# 先将xts对象转为data.frame
googl_df <- as.data.frame(GOOGL)
# 提取原xts的索引作为Date列
googl_df$Date <- index(GOOGL)
# （可选）把Date列移到最前面，看起来更直观
googl_df <- googl_df[, c("Date", setdiff(colnames(googl_df), "Date"))]

转换完成后，你就可以像操作普通数据框一样处理日期了，比如：

# 筛选2017年6月1日之后的数据
subset_googl <- subset(googl_df, Date > as.Date("2017-06-01"))

2. 直接用xts的日期索引进行子集化（更高效） #

xts本身就支持非常灵活的日期子集化，完全不用转换数据类型，适合后续继续使用quantmod的分析功能：

# 提取2017年6月及之后的所有数据
googl_june_plus <- GOOGL["2017-06/"]

# 提取2017年3月到5月的区间数据
googl_mar_to_may <- GOOGL["2017-03/2017-05"]

# 提取某一天的具体数据
googl_single_day <- GOOGL["2017-05-01"]

3. 单独提取日期向量 #

如果只是需要把日期单独拿出来用，直接用index()函数就能获取Date类型的向量：

# 获取所有日期的向量
googl_dates <- index(GOOGL)
# 查看前5个日期
head(googl_dates)

小提示 #

默认情况下getSymbols()会自动把数据赋值到全局环境的变量里（比如这里的GOOGL），如果想手动控制赋值，可以加上auto.assign=FALSE参数：

# 直接将数据返回给变量，避免自动赋值到全局环境
GOOGL <- getSymbols("GOOGL", src = "yahoo", from = start, to = end, auto.assign = FALSE)

内容的提问来源于stack exchange，提问作者Mudit Gupta