Развертывание приложений Rook на внутреннем веб-сервере R

Question

Я разрабатываю Rook Apps, и он отлично работает. поэтому я хочу развернуть под Rstudio с разными IP и PORT: поэтому я использую код Джеффри Хорнера:

http://jeffreyhorner.tumblr.com/post/33814488298/deploy-rook-apps-part-ii

Но не работает! с последним коммитом Rook в github и R версии 3.4.3:

 Error in get(name, envir = asNamespace(pkg) , inherits =FALSE):
object 'startHTTPD' introuvable 
calls : ::: -> get

Собственно, если вы проверите пакет инструментов::. функция startHTTPD больше не существует в tools:: environment. Брено пытается это исправить, но, все же, проблема для меня.

Любой, кто пересекает эту проблему или у меня есть решение.

Благодарю.

Answer 1

Я знаю, что немного опоздал, чтобы ответить на этот вопрос, но это поставило меня в тупик, и я понял это. Имя функции недавно изменилось на "C_startHTTPD". Итак, код, необходимый для запуска внутреннего http-сервера для ладьи, теперь:

if (as.integer(R.version[["svn rev"]]) > 59600) {
  status <- .Call(tools:::C_startHTTPD, myInterface, myPort)
} else {
  status <- .Internal(C_startHTTPD(myInterface, myPort))
}