1
R、バージョン3.3.1を使用しています。今日、私はshinyapps.ioのアカウントを作成し、光沢のあるアプリを配備しました：https://forensis.shinyapps.io/Forensis/光沢のあるSSL接続エラー
ご覧のとおり、簡単なアプリです。これには1つの入力（OIB）と複数の出力があります。 REST DATA APIへのクエリがすべての出力に表示されると言うのはimportanntです。だから私は、OIBを取って、OIBが入力されているAPIからいくつかのデータを尋ねました。
アプリケーションを実行するとすべてうまく動作しますが、ウェブで実行するとOIBを実行しようとするたびにエラーSSL connect errorが生成されます（OIBで試してみてください：93335620125）。
EDIT私はデータAPIへの1つのクエリの例を掲載しています（他は同じです）：私は同様の問題を持っていた
library(httr)
library(RCurl)
library(XML)
for (i in 1:length(report_exe())) {
reqOP <- rbind(fromJSON(toJSON(content(GET(url = "https://api.data-api.io/v1/oibstatus/", add_headers('x-dataapi-key' = "xxxx"), query = list(oib = report_exe())), type = "application/json"), null = "null"), flatten = TRUE))
req[[i]] <- reqOP
}
json <- do.call(rbind, req)
json <- as.data.frame(json)
oib_status <- as.data.frame(lapply(f1(json), unlist), stringsAsFactors=FALSE)
ここでは、1つの呼び出しの例を示します： 'for（i in 1：length（report_exe（）））{ reqOP < - rbind（fromJSON（toJSON（content（GET（url =" https://api.data （ "x-dataapi-key" = "xxxx"）、 query = list（oib = report_exe（）））、type = "application/json"）、null = "NULL"）= TRUEを平坦）） REQ [I] < - reqOP } JSON < - do.call（rbind、REQ） JSON < - as.data.frame（JSON） oib_status < - as.data.frame（lapply（f1（json）、unlist）、stringsAsFactors = FALSE） ' – Mislav