2012-09-11 59 views
1

的开始,使我有一个载体sapply粘贴前的字符串

lizt <- c("a","b","c") 

> lizt 
[1] "a" "b" "c" 

,我可以使用sapply到现在粘贴字符后每个元素

lizt2 <- sapply(lizt,paste0, "$", USE.NAMES=F) 

lizt2 
[1] "a$" "b$" "c$" 

,我怎么使用类似的功能粘贴之前每个元素,所以我得到

lizt3 
[1] "^a$" "^b$" "^c$" 

回答

10

pastepaste0是矢量,所以你不需要sapply

paste0('^', lizt, '$') 
## [1] "^a$" "^b$" "^c$" 
3

由于mnelshowed,你不需要在这里使用sapply,但如果你想,无论如何,你可以创建自己的自定义功能与sapply一起使用是这样的:

> sapply(lizt, function(x) paste0("^", x, "$"), USE.NAMES=FALSE) 
[1] "^a$" "^b$" "^c$"