Очистка и объединение текста

Question

Я пытаюсь объединить переменную дату с фрагментом текста, чтобы она выглядела следующим образом:

time <- c(end_date_override="20180531")

Это мой код:

bb <- Sys.Date()-1
b1 <- paste("c(end_date_override","",sep = "=")
b1<-noquote(b1)
b2 <- as.character(bb)
b3 <- paste(b1,b2)

Это не дает результата в формате c(end_date_override="20180531")

Буду признателен за ваш совет.

Спасибо заранее.

Answer 1

Чтобы получить именованный символ как время, вы можете использовать следующий код. Первая строка - это то, что вам нужно. Остальные показывают результат.

b3 <- setNames(as.character(Sys.Date()-1), "end_date_override")

b3
end_date_override 
     "2018-06-28" 

str(b3)
 Named chr "2018-06-28"
 - attr(*, "names")= chr "end_date_override"

Answer 2

А как же:

bb <- format(Sys.Date()-1,'%Y%m%d')
b1 <- paste("c(end_date_override=",bb,")", sep='"')
b1 <- noquote(b1)
b1  
[1] c(end_date_override="20180628")