Использование R из Scala и вызов Scala из R?

Question

Знаете ли вы что-нибудь о возможностях

• вызов Scala из R и
• использование R (библиотеки) из Scala?

С наилучшими пожеланиями

Раффаэль

Answer 1

Проверьте пакет jvmr в R, доступный на CRAN. Это позволяет:

1. встроить интерпретатор R в Scala
2. встроить интерпретатор / компилятор Scala в R.

Это также позволяет вам делать то же самое с Java. Статья, описывающая его использование, здесь . (Раскрытие: я автор.)

Answer 2

Именно для этой цели в CRAN существует пакет R, называемый rscala. Он допускает двунаправленный вызов (R из Scala и Scala из R), а также обратные вызовы (например, обратный вызов R из кода Scala, вызываемого из R). Это хорошо документировано . Этот пакет заменяет пакет "jvmr", упомянутый в другом ответе.

Answer 3

Мне удалось добиться этого с помощью jvmr. Приведенный ниже код является примером приложения Apache Spark, которое я запускаю из консоли Scala.

package org.scala.rtest

import org.ddahl.jvmr.RInScala

object RIntegration {
    def main(args: Array[String]) {
       val R = RInScala()
       R>"""
            require(sparkR)

            score.sentiment = function(sentences, pos.words, neg.words, .progress='none')
                {
                  require(plyr)
                  require(stringr)


                  scores = laply(sentences, function(sentence, pos.words, neg.words) {

                    # clean up sentences with R's regex-driven global substitute, gsub():

                    sentence = gsub('[[:punct:]]', '', sentence, ignore.case=T)

                    sentence = gsub('[[:cntrl:]]', '', sentence, ignore.case=T)

                    sentence = gsub('\\d+', '', sentence, ignore.case=T)

                    # and convert to lower case:

                    sentence = tolower(sentence)

                    # split into words. str_split is in the stringr package

                    word.list = str_split(sentence, '\\s+')

                    # sometimes a list() is one level of hierarchy too much

                    words = unlist(word.list)

                    # compare our words to the dictionaries of positive & negative terms

                    pos.matches = match(words, pos.words)
                    neg.matches = match(words, neg.words)

                    # match() returns the position of the matched term or NA
                    # we just want a TRUE/FALSE:

                    pos.matches = !is.na(pos.matches)

                    neg.matches = !is.na(neg.matches)

                    # and conveniently enough, TRUE/FALSE will be treated as 1/0 by sum():

                    score = sum(pos.matches) - sum(neg.matches)

                    return(score)

                  }, pos.words, neg.words, .progress=.progress )
                  scores.df = data.frame(score=scores, text=sentences)
                  return(scores.df)
                } 


       """

        R(" x <- scan('positive-words.txt',what='character',comment.char=';')")
        R(" y <- scan('negative-words.txt',what='character',comment.char=';')")
        R(" z <- scan('twitterstream1.txt', what='character' )")

        R.eval("df <- score.sentiment(z,x,y)")  
        println(R.capture("df"))

        }
}

Надеюсь, это поможет.

Answer 4

Я не знаю, есть ли прямой интерфейс Scala, но rJava http://www.rforge.net/rJava/ должен помочь.

Answer 5

Можно использовать rJava , но я не уверен, что это лучший способ.

Answer 6

https://github.com/hughleat/scala2R

Я написал это, изучая Scala.Не уверен, что это работает больше.Это была небольшая DSL-упаковка JRI.Возможно, макросы и др. Теперь могли бы работать намного лучше.

Answer 7

JRI , который является частью rJava , может быть тем, что вы ищете