R 是否可以在另一个文件(或包)中定义垂直函数
当在另一个文件中定义了一个铅锤函数时,我在获取该函数的语法时遇到了一些问题 我想把一个标准铅锤函数放在一个包里。我的第一次尝试是这样的:R 是否可以在另一个文件(或包)中定义垂直函数,r,plumber,R,Plumber,当在另一个文件中定义了一个铅锤函数时,我在获取该函数的语法时遇到了一些问题 我想把一个标准铅锤函数放在一个包里。我的第一次尝试是这样的: # in the package #' Get results for plumber #' #' @param client the clientname #' @param date The date of data to fetch #' @param config a config file #' #' @export plumber_ga &l
# in the package
#' Get results for plumber
#'
#' @param client the clientname
#' @param date The date of data to fetch
#' @param config a config file
#'
#' @export
plumber_ga <- function(client = "none", date = Sys.Date(), config = NULL){
message("Calling API for client:", client, " for date:", date)
...
}
(也在包装上询问)这项工作:
#* Get data
#* @param client the clientname
#* @param date One day of data to fetch
#* @param config A config file TBD
#* @post /datalake/<client>/google_analytics
function(client = "none", date = Sys.Date(), config = NULL){
plumber_ga(client, date, config)
}
#*获取数据
#*@param client是clientname
#*@param date要获取的数据的一天
#*@param config A配置文件待定
#*@post/datalake//google\u分析
函数(client=“none”,date=Sys.date(),config=NULL){
水管工(客户、日期、配置)
}
您必须设置一个defatulclient
API密钥才能运行此操作。不,您不需要,client是我输入的一个参数,我可以将其更改为foo
,以获得相同的效果。您是对的。我看得出你在试图编译你的包,对吧?!构建包没有问题
# api.R
#* Get data
#* @param client the clientname
#* @param date One day of data to fetch
#* @param config A config file TBD
#* @post /datalake/<client>/foo
function(client = "none", date = Sys.Date(), config = NULL){
...
}
#* Get data
#* @param client the clientname
#* @param date One day of data to fetch
#* @param config A config file TBD
#* @post /datalake/<client>/google_analytics
function(client = "none", date = Sys.Date(), config = NULL){
plumber_ga(client, date, config)
}