Как назначить 3 различных значения в переменной (1200 вхождений)

Question

У меня есть такая переменная

NewDate
02-11-2021
02-11-2021
02-11-2021
02-11-2021
02-11-2021
02-11-2021
02-11-2021

Я хочу, чтобы это выглядело так

NewDate
02-11-2021
09-10-2009
05-05-2011
02-11-2021
09-10-2009
05-05-2011
...(1200 times)

Answer 1

Вы можете разделить на каждую строку, rbind новый фрейм данных с запрошенными датами, и rbind весь список, т.е.

do.call(rbind, lapply(split(dd, seq(nrow(dd))), 
                  function(i) {i <- rbind(i, 
                                   data.frame(NewDate = c("09-10-2009", "05-05-2011"), 
                                                              stringsAsFactors = FALSE)); i}))

Answer 2

вы можете использовать:

insertDates<- c("09-10-2009", "05-05-2011")
c(sapply(df1$NewDate, function(x) {c(x,insertDates)}))

чтобы получить что-то, похожее на ваш конечный результат:

data.frame(NewDate = c(sapply(df1$NewDate, function(x) {c(x,insertDates)})), stringsAsFactors = FALSE)

---

данные:

df1<-
structure(list(NewDate = c("02-11-2021", "02-11-2021", "02-11-2021", 
"02-11-2021", "02-11-2021", "02-11-2021", "02-11-2021")), row.names = c(NA, 
-7L), class = "data.frame")