在函数中指定输入
specify input in function
如何在 R 函数中将输入指定为仅数字 class?。例如,
read_data <- function(file_name, sheet, sample_list = stop("'sample_list' must be provided")){
ibrary(readxl)
data = read_excel(file_name, sheet = 2)
meantritc = sapply(samplelist, function(x)data[grep(x, pattern = data$Source),]$Mean)
names(data) = sample_list
return(data)
}
如果按照read.xlsx()
的要求,提到了sheetname
怎么办,它应该能够打印一条信息来提供sheet号码intread?
您可以通过在您的函数中放置以下内容来完成此操作:
if (is.character(sheet))
{
stop("Sheet must be a number!")
}
如何在 R 函数中将输入指定为仅数字 class?。例如,
read_data <- function(file_name, sheet, sample_list = stop("'sample_list' must be provided")){
ibrary(readxl)
data = read_excel(file_name, sheet = 2)
meantritc = sapply(samplelist, function(x)data[grep(x, pattern = data$Source),]$Mean)
names(data) = sample_list
return(data)
}
如果按照read.xlsx()
的要求,提到了sheetname
怎么办,它应该能够打印一条信息来提供sheet号码intread?
您可以通过在您的函数中放置以下内容来完成此操作:
if (is.character(sheet))
{
stop("Sheet must be a number!")
}