plumber
уже озвучивает это, вы удваиваете это. Попробуйте это:
#' Home endpoint
#' @get /
function(){
df <- data.table::data.table(msg = "Welcome")
return(df)
}
И затем в моей консоли я запустил:
pr <- plumber::plumb("~/StackOverflow/4393334/60918243.R")
pr$run()
# Starting server to listen on port 5225
# Running the swagger UI at http://127.0.0.1:5225/__swagger__/
А затем на моей bash оболочке:
$ curl -s localhost:5225
[{"msg":"Welcome"}]