r - 为什么使用空格分隔符粘贴不能按预期工作？

Question

我需要从 POS 向量列表中造句。所以我使用pastewithsep=' '但这似乎对我的结果没有影响。为什么？

listPOS <- list(c("/NN", "/PDAT", "/VVFIN", "/VVPP", "./$."), 
                c("/PPER",  "/VVFIN", "/APPR", "./$."))

# See the arrow                                           V
vecPOS <- unlist(lapply(listPOS, function(x) paste(x,sep=" ",collapse="")))

# Need vector like:
vecPOS
[1] "/NN /PDAT /VVFIN /VVPP ./$." "/PPER /VVFIN /APPR ./$."

# Get instead an vector like:
vecPOS
[1] "/NN/PDAT/VVFIN/VVPP./$." "/PPER/VVFIN/APPR./$." 

Answer 1

您需要collapse = " "代替sep = " "：

sapply(listPOS, function(x) paste(x, collapse = " "))
# [1] "/NN /PDAT /VVFIN /VVPP ./$." "/PPER /VVFIN /APPR ./$."