Я пытаюсь перенаправить вывод из одной функции в другую в сценарии plumber R
для развертывания API
. Но я не могу найти способ сделать это.
Мой plumber.R
выглядит так:
library(plumber)
#* parse JSON
#* @param a a vector
#* @param b a vector
#* @post /product
function(a, b) {
#result <- data.frame(a = as.numeric(a), b = as.numeric(b))
prod <- as.numeric(a) * as.numeric(b)
return(prod)
}
#* parse JSON
#* @param a a vector
#* @param b a vector
#* @post /sum
function(a, b) {
#result <- data.frame(a = as.numeric(a), b = as.numeric(b))
sum <- as.numeric(a) + as.numeric(b)
sum
}
#* parse JSON
#* @param a a vector
#* @param b a vector
#* @post /return_product
function() {
prod_new <- prod + 1
return(prod_new)
}
#* parse JSON
#* @param a a vector
#* @param b a vector
#* @post /return_sum
function() {
sum_new <- sum + 1
return(sum_new)
}
У меня есть 4 функции:
- product
- sum
- return_product
- return_sum
И я пытаюсь использовать вывод из функции product
в return_product
и аналогично вывод из sum
в return_sum
. Я довольно новичок в API, и любая помощь будет очень признательна.