R 数据转换为列股票代码

编程问答 2022-05-28

问题描述

我正在下载 stock_list 中包含 5 个符号的股票数据。以下代码有效：

stock_list <- c("ZM","XLNX","XEL","WDC","WDAY")

master_df <- NULL
for (idx in seq(length(stock_list))){
  stock_index = stock_list[idx]
  getSymbols(stock_index,verbose = TRUE,src = "yahoo") 
  temp_df = as.data.frame(get(stock_index))
  temp_df$Date = row.names(temp_df)
  temp_df$Index = stock_index
  row.names(temp_df) = NULL
  colnames(temp_df) = c("Open","High","Low","Close","Volume","Adjusted","Date","Index")
  temp_df = temp_df[c("Date","Index","Open","Adjusted")]
  master_df = rbind(master_df,temp_df)
}

股票代码也在excel的“数据”中； 1 列，5obs。详细信息如下： 5 个水平的因子。

如何转换数据并写入例如股票 list <- c(xy)，以便我不必手动将符号写入列表？

所以我尝试了： stock_list <- c(data)

控制台显示：

*$ï..Nasdaq5Symbole
[1] ZM   XLNX XEL  WDC  WDAY

Levels: WDAY WDC XEL XLNX ZM*

我该如何解决长度问题（见下面的错误）？？

*Error in attributes(.Data) <- c(attributes(.Data),attrib) : 
  'names' attribute [5] must be the same length as the vector [1]*

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

rrtransformationvariable-length