Inheritance OR Call the function from another function in R

Question

I am Developing an API for that I am using Plumber were I have created function and wanted to call the function into another function. Suppose First Function can be called by Second Function or Second function can be function be third function.

library(plumber)

#* @get /echo
trial_query<- function(msg = "") {
    list(msg = paste0("The message is: '", msg, "'"))
}

#* @get /calling
abc <- function(){
  list(msg = paste0("The message is: '", msg, "'"))
}

User-input is store in msg variable and I want call the trail_query function and also with there is argument in abc function

question from:https://stackoverflow.com/questions/65884366/inheritance-or-call-the-function-from-another-function-in-r

Answer 1

I'm not sure I understand what you are trying to do. I would advise to read on R scoping.

Here is something that could inspire you, maybe?

library(plumber)

states <- new.env()
trial_query<- function(msg = "") {
    states$msg <- msg
    list(msg = paste0("The message is: '", msg, "'"))
}

abc <- function(){
  list(msg = paste0("The message is: '", states$msg, "'"))
}

#* @get /echo
trial_query

#* @get /calling
abc