将文本添加到data.frame的一列

Question

我想只在一列添加一个文本.

我尝试了以下(这里作为一个例子):

employee <- c('John Doe','Peter Gynn','Jolie Hope')
addMe <- c('test1','test2','test3')
salary <- c(21000, 23400, 26800)
dat <- data.frame(employee, salary, addMe)

dat[] <- lapply(dat$addMe, function(x) paste(' Please delete this col!', x))

但是,我的结果框架如下所示:

     employee                            salary                          addMe
1    Please delete this col! John Doe    Please delete this col! 21000   Please delete this col! test1
2    Please delete this col! Peter Gynn  Please delete this col! 23400   Please delete this col! test2
3    Please delete this col! Jolie Hope  Please delete this col! 26800   Please delete this col! test3

但是我希望得到一个结果:

    employee      salary        addMe
1   John Doe      21000         Please delete this col! test1
2   Peter Gynn    23400         Please delete this col! test2
3   Jolie Hope    26800         Please delete this col! test3    

有什么建议我做错了吗？

感谢您的回复!

Answer 1

赶紧跑

dat$addMe <- paste0("Please delete this col! ", dat$addMe)

代替你的lapply线.