在函数中指定输入

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!")
}