Ошибка: Подходящие серверы не найдены (`serverSelectionTryOnce` установлен): [время ожидания сокета вызывает ismaster on ...] - PullRequest
1 голос
/ 23 октября 2019

Мне интересно, почему shinyapps.io больше не может подключаться к mongoDB из Atlas. Я сделал бесчисленные проекты, используя mongoAtlas и shinyapps.io.

На сегодняшний день любое новое приложение, которое я публикую, не позволяет мне подключаться к моей mongoDB.

В моих журналах появляется ошибка: не найдено подходящих серверов (serverSelectionTryOnce установлено):[таймаут сокета вызывает ismaster на 'cluster0-shard-00-00-02dsl.mongodb.net:27017']

Код отлично работает на Rstudio Cloud, моем локальном компьютере и локальном компьютере моих друзей. Но 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 Ответ

1 голос
/ 23 октября 2019

Вы можете попробовать сейчас. Вероятно, была какая-то проблема с MongoDB или shinyapps.io. Скорее второй. Теперь все работает.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...