Как добавить номер столбца перед каждым элементом?

Question

Вот простые данные:

a <- c( "a" ,"a")
b <- c("b", "b")
df <- data.frame(a, b)

df[] <- paste0(1:2, unlist(df[,1:2]))

   a  b
1 1a 1b
2 2a 2b

Вывод, который я ищу:

   a  b
1 1a 2b
2 1a 2b

Любой эффективный способ сделать это?

Это работает, но я уверен, что есть гораздо лучший способ.Спасибо!

df2[] <- paste0(col, unlist(t(df2[,1:2])))
t(df2)

Answer 1

Попробуйте это:

df[] <- Map(paste0, seq_along(df), df)
df
##    a  b
## 1 1a 2b
## 2 1a 2b