将R Shining应用程序推送到CloudFoundry/IBMBluemix时读取端口时出现问题

我创建了一个“HelloWorld”闪亮的应用程序进行测试，但我无法读取CloudFoundry注入到容器中的HTTP端口（myPort是NA）

这是我的密码：

install.packages('shiny')
library(shiny)

server = function(input, output) {
  output$plot = renderPlot(
  hist(faithful$waiting, breaks = input$bins)
  )
}

ui = basicPage(
  plotOutput('plot'),
  sliderInput('bins','Number of bins:',1,50,20),
)

myPort <- as.numeric(Sys.getenv('VCAP_APP_PORT'))
shinyApp(ui, server,options = c('port'=myPort))

install.packages（'shinny'））
图书馆（闪亮）
服务器=功能（输入、输出）{
输出$plot=renderPlot(
历史记录（忠实的$waiting，中断=输入$bin）
)
}
ui=基本页面(
plotOutput（'plot'），
滑块输入（“箱子”，“箱子数量：”，1,50,20），
)
myPort是否可能
as.numeric
转换得到的端口号中包含非数字字符？类似于
as.numeric（“r1234”）
的内容将返回
NA
您应该使用
'PORT'
或
'CF\u INSTANCE\u PORT'
，因为
'VCAP\u APP\u PORT'
已弃用，并且可能无法在您的云铸造系统上使用。您可以打印出
myPort
的值，然后检查
cf logs rkier
以查看您得到的值吗？所有这些都是空的：print（Sys.getenv（'VCAP\u APP\u PORT'））print（Sys.getenv（'cf\u INSTANCE\u PORT'））print（Sys.getenv（'PORT'））