R for 循环将值添加到新列

Question

我正在尝试在 R 数据帧中运行 for 循环以提取股票数据帧的最后价格。我无法将结果附加到原始数据框并将其用作第二列。这是迄今为止我正在使用的代码。我可以打印但不能添加到新列。我尝试将循环值设置为等于新列，但出现错误

    for (i in df_financials$Ticker){
      df_financials$Last_Price=(bdp(i,'PX_LAST'))

     }


    Error in `$<-.data.frame`(`*tmp*`, "Last_Price", value = list(PX_LAST = 
    NA_real_)) : 
    replacement has 1 row, data has 147 


Print(df_financials)

    Ticker
1     ENH Equity
2     AXS Equity
3     BOH Equity
4     CNA Equity
5     TRH Equity

Answer 1

您首先需要指定将命令应用于所述向量的顺序以及何时停止[即，在for() 中使用1:length(df$Var)]。其次，指定要替换新列的哪一行 (i)（即df$var[i]）。试试下面的代码，看看是否可行。

for (i in 1:length(df_financials$Ticker)){
  df_financials$Last_Price[i]=(bdp(i,'PX_LAST'))
}

我不熟悉 bdp() 函数本身。然而，我怀疑 问题是您试图从列表中提取数据，其中的股票数量超过您感兴趣的数量。如果是这种情况，您需要参考第 i 行中您想要获得最后价格的股票。如果我理解正确，下面的代码应该可以解决问题。

我假设列表类似于

Stock<-data.frame(other_stocks = c("ENH","AXS","Rando1","BOH","CNA","TRH","Rando2","Rando3"), 
PX_LAST=c(1,2,3,4,5,6,7,8))

库存

for (i in 1:length(df$Ticker)){
    df$Last_Price[i]=(bdp(df$Ticker[i],'PX_LAST'))
}