r - 管道工 R 包 - 发布请求不起作用

Question

我尝试使用水管工包发出发布请求。

library(jsonlite)
#* @post /sum
addTwo <- function(a, b){
  x <- as.numeric(a) + as.numeric(b)
  return(x)
}

然后我写

library("plumber") r <- plumb("C:/.../post.R")

但随后出现错误：

警告消息：在 readLines(file) 中：在 'C:/.../post.R' 上找到不完整的最后一行

Answer 1

这只是一个警告，表明您的文件中没有尾随换行符post.R。您可以忽略它或在文件末尾添加一个空行以使其消失。

实际的问题是你从来没有运行过 API，只是定义了它。

# Load Plumber
library("plumber") 

# define the plumber router in the variable r
r <- plumb("C:/.../post.R")

# Run r on port 8000
r$run(port=8000)