왜 공백 구분 기호로 붙여 넣기 작업을 예상하지 못합니까?

Question

POS의 벡터 목록에서 문장을 만들어야합니다. 그래서 을 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 ./$."