Fehler bei der Verwendung von NGramTokenize (Problem beim Laden)

Question

Ich verwende den NGramTokenizer aus dem rWeka-Paket. Ich glaube, ich habe alles richtig installiert. Ich Ausführung den folgenden Code:

Bigram_Tokenizer <- function(x) NGramTokenizer(x, Weka_control(min = 2, max = 2)) 
tdm <- TermDocumentMatrix(corpus, control = list(tokenize= Bigram_Tokenizer())) 

Fehler I erhalten ist:

Error in lapply(x,f): argument "x" is missing with no default. 

Irgendwelche Ideen, wie man dieses Problem zu beheben? Nochmals vielen Dank im Voraus.

Beste

Vishal

Answer 1

Sie scheinen Bigram_Tokenizer() in TermDocumentMatrix Funktion zu Ausführung anstatt nur durch Verweis übergeben. Sie müssen es nur ohne Ausführung übergeben:

Bigram_Tokenizer <- function(x) NGramTokenizer(x, Weka_control(min = 2, max = 2)) 
tdm <- TermDocumentMatrix(corpus, control = list(tokenize= Bigram_Tokenizer))