我想寫一個函式，將多個字串連接成一個字串，但是每個部分都用引號標記并用逗號分隔。
該函式基本上應該接受輸入"a"并"b"列印 this c('"a", "b"')，這將產生如下輸出：
c('"a", "b"')
# [1] "\"a\", \"b\""
如何c('"a", "b"')在函式體中創建它？
uj5u.com熱心網友回復：
您可以通過一個來實作它paste0()：
x <- c("a", "b", "c")
paste0('"', x, '"', collapse = ", ")
# [1] "\"a\", \"b\", \"c\""
或sprintf() toString()：
toString(sprintf('"%s"', x))
# [1] "\"a\", \"b\", \"c\""
uj5u.com熱心網友回復：
這個怎么樣：
x <- c("a", "b")
out <- paste0("c(", paste0('"', x, '"', collapse=", "), ")")
out
#> [1] "c(\"a\", \"b\")"
eval(parse(text=out))
#> [1] "a" "b"
由reprex 包(v2.0.1)創建于 2022-05-13
uj5u.com熱心網友回復：
與dQuote：
v <- c("a", "b", "c")
toString(dQuote(v, q = ""))
#[1] "\"a\", \"b\", \"c\""
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/473901.html