strings <- c("apple", "banana", "029")
> strings
[1] "apple" "banana" "029"
我想為每個元素添加單引號，strings并用,. 我想要的輸出是這樣的：
desired_strings <- "'apple','banana','029'"
> desired_strings
[1] "'apple','banana','029'"
我的嘗試：
a <- "'"
paste0(mapply(paste0, a, strings, a), ",")
[1] "'apple'," "'banana'," "'029',"
然而，這并不完全正確。
uj5u.com熱心網友回復：
您可以使用sQuote()然后折疊為單個字串paste()：
paste(sQuote(strings, q = FALSE), collapse = ",")
[1] "'apple','banana','029'"
uj5u.com熱心網友回復：
使用sprintf.
toString(sprintf("'%s'", strings))
# [1] "'apple', 'banana', '029'"
或者
paste(sprintf("'%s'", strings), collapse=",")
# [1] "'apple','banana','029'"
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/510256.html
標籤：r细绳文本