Почему вставка с пробелом не работает так, как ожидалось?

Question

Мне нужно составить предложения из списка векторов POS. Поэтому я использую paste с sep=' ' Но, похоже, это никак не повлияет на мой результат. Зачем?

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 ./$."