将函数中的局部变量传递给外部函数

Question

我试图从我的readline / input函数传递符号函数（readstock）

readinteger <- function()
 {
  symbol <- readline(prompt="Enter an symbol: ")
  return(as.character(symbol))
 }

# return df of stock value for x history

readinteger()

stock <- paste("YAHOO/",symbol)

df <- Quandl(stock)

为什么这不会返回我可以在粘贴中调用的符号对象？

Answer 1

更新：知道了！只需使用完整函数调用作为对象！

stock <- paste("YAHOO/",readstock())