plumber.R

In RobAumer/testconnetpack:

#* Redistributes campaign budget amongst adgroups
#*
#* @get /testapi
#*
#* @serializer unboxedJSON
#*
rtb <- function() {

  # require(magellanR)


  # Build the response object (list will be serialized as JSON)
  response <- list(statusCode = 200,
                   data = "master",
                   message = "sucess"
  )

  return(response)
}