Ошибка в наследовании (x, "Date"): аргумент "x" отсутствует, без Rstudio по умолчанию

Question

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

vlf=function(x)
{
  output=c(as.Date)
  for(i in (seq(as.Date("2015/09/1"),as.Date("2018/09/1"),by=365))){
    output=c(output,
         ifelse(x>i,x+30,0))
  }
  return(output)
}

Где "x" - вектор дат. Проблема в том, что когда я пытаюсь его выполнить, я читаю эту ошибку:

Error in inherits(x, "Date") : argument "x" is missing, with no default

знаете, как я могу это решить?

Answer 1

Вы говорите

output=c(as.Date) 

, который устанавливает output для функции, а не результат вызова функции.Используйте

output <- as.Date(x)

Нет необходимости в c(), и <- лучше, чем = в R.