Заголовок: Передача значения переменной функции в R

Question

Заранее благодарим за помощь. Я запускаю функцию и пытаюсь использовать значение переменной в некоторых присвоениях имен в функции, которая будет вызывать таблицу .xts.

PassValue <- function(dfX) {
    start <- as.Date("2019-01-01")
    end <- as.Date("2020-10-01")
    dfNew = paste0("A1_",dfX)
    assign( dfNew ,getSymbols( Symbols = dfX, src='yahoo',from = start, to = end, auto.assign=FALSE ),envir = .GlobalEnv)
    weeklyReturn(dfNew)
}

Когда я вызываю функцию ... PassValue ( "GS"), он возвращает следующее:

PassValue("GS")
Error in try.xts(x) : 
  Error in UseMethod("as.xts") :   no applicable method for 'as.xts' applied to an object of class "character"
Called from: try.xts(x)

Опять же, я ценю вашу помощь.

Answer 1

Не уверен, что должен вернуть символ «A1_GS», но ваша функция assign должна быть именованным объектом цен для weeklyReturn ().

PassValue <- function(dfX) {
    start <- as.Date("2019-01-01")
    end <- as.Date("2020-10-01")
    dfNew = paste0("A1_",dfX)
    dat_val<-assign( dfNew ,getSymbols( Symbols = dfX, src='yahoo',from = start, to = end, auto.assign=FALSE ),envir = .GlobalEnv)
    weeklyReturn(dat_val)
}