目錄
原始文章
將向量中的物件加上括號或特殊符號,我認為這是一個超級常用的功能,尤其是會在R中直接寫SQL語法的使用者來說,使用頻率更高。如以下範例:
# SQL語法
# where colname in ("R", "Python", "SQL")
vec <- c("R", "Python", "SQL")
> [1] "R" "Python" "SQL"
vec_paste <- paste0(vec, collapse = ",")
> [1] "R,Python,SQL"
# 將向量中的物件合併之後,每個物件都少了括號
來吧,複製貼上
add_quotation_for_vector <- function(input, mark = "'"){
len <- length(input)
quotation <- rep(mark, times = len)
return_vec <- paste0(quotation, input, quotation)
return(return_vec)
}
# 範例
vec <- c(123, "ABC", "D")
vec2 <- add_quotation_for_vector(vec)
> [1] "'123'" "'ABC'" "'D'"