r - POST リクエストを介して配管工を使用して csv を受信する

Question

誰かがVBAコードを使用してファイルを投稿したときに、csv ファイルをデータベースに送信しようとしています ( API 呼び出しにVBAは 80 文字の制限があるため、解析して確認するには、csv をサーバーにアップロードする必要があります)。

これを行うために、私は使用plumberとPOST要求を目指しています。これを行うための API の構成方法について、私の知識は少し限られています。以下は、私がそれがどのように起こっているかの大まかな例です。これは可能plumberですか？

# api_main.R

library(plumber)

#* @awesomeAPI Simple API to upload csv

#* Return status on received csv
#* @param req
#* @post /upload
function(req) {
  df <- read.csv(req$body)
  if(all(c("A", "B", "C", "D") %in% names(df))){
    return(data.frame(msg = "Not all columns available", status = 418))
  } else {
    # upload data to DB here
    return(data.frame(msg = "OK", status = 200))
  }
}

サービスを開始します。

plumber::plumb("api_main.R")$run(port = 5762)