Ошибка подключения к базе данных (Mysql) при публикации блестящего приложения

Question

При локальном запуске моего блестящего приложения все работает нормально.Однако при развертывании (публикации) на «shinyapps.io», который является бесплатным сервисом, приложение не работало, потому что оно не могло подключиться к Mysql, как я проверил в журналах от shinnyapps.

Я использовал библиотеку "dplyr", чтобы установить соединение.Сервер, к которому я подключаюсь, не облачный, а локальный.

mydb <- dbConnect(MySQL(), user="USER", dbname = "DB", password = "XXXX", host = "192.168.6.6",port=3306)

Ошибка журнала показала следующее сообщение об ошибке:

Warning: Error in .local: Failed to connect to database: Error: Can't connect to MySQL server on '192.168.0.5' (110)

Answer 1

mydb <- dbConnect(MySQL(), 
  user="USER", dbname = "DB", password = "XXXX",
  host = "192.168.6.6",port=3306)

Этот адрес хоста, начиная с 192.168, находится в вашей локальной подсети, возможно, на вашем персональном компьютере или ноутбуке.Ваше блестящее приложение работает на сервере в центре обработки данных где-то, возможно, на другом конце планеты.Ему нужен общедоступный IP-адрес вашего сервера, а не адрес локальной сети.Доступен ли ваш сервер за пределами вашей локальной сети?Используйте этот IP-адрес и надейтесь, что блестящий сервер не защищает исходящие соединения.