Question

如何在R中使用JAVA写的程序包

Answer 1

library(rJava).jinit("JGibbLDA-v.1.0/bin/") #载入第三方类库.jaddClassPath("JGibbLDA-v.1.0/bin/")ldaOption <- .jnew("jgibblda/LDACmdOption") #定义 inferencer 的参数ldaOption$inf = TRUEldaOption$dir = "models/casestudy" # model 的路径ldaOption$modelName = "model-final" # model 的名字，这里我们用的 model-finalldaOption$niters = as.integer(100) # gibb sampling 次数ldaOption$dfile = "newdata.dat" # 新的数据集，注意要按照指定的格式inferencer <- .jnew("jgibblda/Inferencer") #创建一个新的 inferencerinferencer$init(ldaOption)newModel <- inferencer$inference() #对新数据集做推断