私たちのローカル サーバーで Shiny を使用して、ユーザーが ESRI シェープファイルと関連ファイルを含む .zip ファイルをアップロードできるアプリを構築しようとしています。Shiny サーバーの fileInput はデータを取得でき、取得すると一時ディレクトリとファイル名に格納されます。そのファイル名は常にかなり一般的な「0」のようです。手でファイル「0」を解凍しようとすると、機能します。しかし、R 関数 unz (これは機能するはずです) を使用してプログラムで実行しようとすると失敗し、「zip ファイル '0' を開けません」というエラー メッセージが表示されます。理由がわかりません。誰か助けてくれますか?
コードは次のとおりです。
shinyServer(function(input, output) {
mySHPdata <- reactive({
inFile <- input$file1
if (is.null(inFile))
return(NULL)
print((inFile$datapath))
data<-read.table(unz(basename(inFile$datapath), "testme.shp"))
関連するファイルを 1 つずつ抽出する必要があるため、ここではそのうちの 1 つを開こうとしているだけです。なぜこれがうまくいかないのか誰にもわかりますか?