错误:找不到合适的服务器(设置了serverSelectionTryOnce):[套接字超时在...上调用ismaster]

时间:2019-10-23 05:31:20

标签: r mongodb shiny shinyapps mongolite

我想知道为什么Shinyapps.io不再可以从Atlas连接到mongoDB。我使用mongoAtlas和Shinyapps.io完成了无数项目。

截止到今天,我发布的任何新应用都不允许我连接到mongoDB。

在我的日志中,我得到一个错误: 找不到合适的服务器(设置了serverSelectionTryOnce):[在'cluster0-shard-00-00-02dsl.mongodb.net:27017'上调用ismaster的套接字超时]

该代码可以在Rstudio Cloud,我的本地PC和朋友的本地PC上完美运行。但是Shinyapps.io很难过。

UI.R

library(mongolite)
shinyUI(fluidPage(

    # Application title
    titlePanel("Old Faithful Geyser Data"),

    # Sidebar with a slider input for number of bins
    sidebarLayout(
        sidebarPanel(
            sliderInput("bins",
                        "Number of bins:",
                        min = 1,
                        max = 50,
                        value = 30)
        ),

        # Show a plot of the generated distribution
        mainPanel(
            tableOutput("table")
        )
    )
))

Server.R

library(shiny)

# Define server logic required to draw a histogram
shinyServer(function(input, output) {
    url = "mongodb://jwrong:<mypass>@cluster0-shard-00-00-02dsl.mongodb.net:27017,cluster0-shard-00-01-02dsl.mongodb.net:27017,cluster0-shard-00-02-02dsl.mongodb.net:27017/test?ssl=true&replicaSet=Cluster0-shard-0&authSource=admin&retryWrites=false"
    df.orats = mongo(collection = "df.orats", db = "test", url = url, verbose = T)



    d = df.orats$find()

    output$table <- renderTable({
        d
    })

})

1 个答案:

答案 0 :(得分:1)

您可以立即尝试。可能是MongoDB或Shinyapps.io存在问题。而不是第二个。现在一切正常。