Как изменить вектор до конца каждой строки в кадре данных через dplyr в R?

Question

Как и ожидалось, этот код

myLines="
Greek
alpha
beta
gamma
"
myData <- read.table(text=myLines, header=TRUE)
print(myData)

производит:

  Greek
1 alpha
2  beta
3 gamma

Теперь я хочу изменить вектор c (1,2,3,4) до конца каждогострока, чтобы получить это:

  Greek justSomeVector
1 alpha     c(1,2,3,4)
2  beta     c(1,2,3,4)
3 gamma     c(1,2,3,4)

Итак, я попробовал это:

library(dplyr)
myData=myData%>%mutate(justSomeVector=c(1,2,3,4))

И это приводит к этой ошибке:

Error in mutate_impl(.data, dots) : 
  Column `justSomeVector` must be length 3 (the number of rows) or one, not 4

Как я долженизменить мой код, чтобы заставить работать мутацию?

Answer 1

Вам необходимо перечислить список чисел, иначе он будет видоизменяться, как если бы justSomeVector был вектором, который нужно распределить по строкам

myData=myData%>%mutate(justSomeVector=list(c(1,2,3,4)))
#  Greek justSomeVector
#1 alpha     1, 2, 3, 4
#2  beta     1, 2, 3, 4
#3 gamma     1, 2, 3, 4