如何在R中使用Python的NLTK包

Question

现在，我试图通过reticulate库在R中使用Python的NLTK包。这就是我编写的简单解析。

install.packages("reticulate")

library(reticulate)
nltk = import("nltk")
grammar = nltk$CFG$fromstring(input = "S -> NP VP, 
                              PP -> P NP, 
                              NP -> Det N | Det N PP | 'I', 
                              VP -> V NP | VP PP, 
                              Det -> 'an' | 'my', 
                              N -> 'elephant' | 'pajamas', 
                              V -> 'shot', 
                              P -> 'in' ")

sent = unlist(strsplit('I shot an elephant in my pajamas', ' '))
parser = nltk$ChartParser(grammar, strategy = sent)

但是，grammar不起作用，我不知道如何处理它。 另外，我想知道上面使用parser是否正确，因为它与Python中的行sent.parser()不同。