如何在水管工api中上传xlsx文件作为输入

问题描述

我想要一个可以上传xlsx文件的api，该文件由 用户。api应该将任何xlsx文件作为输入。

解决方法

#* @post /upload_excel
#* @param f:file
#* @param sheet:str
#* @param range:str
function(f,sheet,range) {

  tmp <- tempfile("plumb",fileext = paste0("_",basename(names(f))))
  on.exit(unlink(tmp))
  writeBin(f[[1]],tmp)
  t <- readxl::read_excel(tmp,range)
  nrow(t)
}