텍스트에서 명사와 동사를 추출하는 방법

Question

R 패키지 openNLP에서 명사와 동사를 각각 추출 할 수 있는지 궁금합니다. 문장을 태그 지정하는 tagPOS 함수를 사용하지만 별도로 동사, 명사를 따로 추출하려는 경우 어떻게해야합니까?

Answer 1

예를 사용하여 (이것은 x는/VBX, 하나의 문자로 태그 단어를 추출)

좋아, 내 정규 표현식 위해 몇 가지 개선이 필요한

가 마지막 줄 제거하는

library("openNLP") 

acq <- "Gulf Applied Technologies Inc said it sold its subsidiaries engaged in pipeline and terminal operations for 12.2 mln dlrs. The company said the sale is subject to certain post closing adjustments, which it did not explain. Reuter." 

acqTag <- tagPOS(acq) 

sapply(strsplit(acqTag,"[[:punct:]]*/VB.?"),function(x) sub("(^.*\\s)(\\w+$)", "\\2", x)) 

    [,1]       
[1,] "said"       
[2,] "sold"       
[3,] "engaged"      
[4,] "said"       
[5,] "is"       
[6,] "did"       
[7,] " not/RB explain./NN Reuter./." 

그 결과

편집

대안은 행이 space 문자를

sapply(strsplit(acqTag,"[[:punct:]]*/VB.?"),function(x) {res = sub("(^.*\\s)(\\w+$)", "\\2", x); res[!grepl("\\s",res)]})