r - 检查数据类型是否合适，如果不合适则返回错误消息

Question

如果传递给函数的参数不是所需的类型(字符)，我想返回错误消息

if (!typeof(param1) == "character" || !typeof(param2) == "character") {
    stop("You must provide valid arguments")
  }

这仅在我提供无效参数时有效。如果缺少某些参数，如何确保显示消息，因为如果我调用不带任何参数的函数则不起作用？

Answer 1

您可以使用missing()来检查是否提供了参数。这比建议使用与预期类型不同的默认值的其他答案更受欢迎(多么令人困惑!)。仅当默认值有意义时才使用默认值。

此外，一般来说，使用 typeof() 进行类型检查并不是一个好主意。 typeof() 函数返回数据在 R 实现中的存储方式。通常，函数关心对象是否提供与类相对应的特定 API。要检查继承，请使用 is()。但在这种情况下，为了提高可读性并遵循约定，请考虑使用 is.character()。

所以你可能会得到类似的东西:

if (missing(param1) || !is.character(param1)) {
  stop("'param1' must be provided as a character vector")
}

此外，检查向量时要记住的事情:

• 通常我们确实期望一个标量，即长度为 1 的向量，但向量可以具有任意长度，因此我们应该检查它的长度是否为 1。
• 向量可能包含缺失值，而代码通常无法处理这种情况，因此我们通常需要确保这些值不缺失。

您可能会发现为此定义帮助器很有用，例如 Bioconductor 中 S4Vectors 包中的此函数:

isSingleString <- function (x) 
{
    is.character(x) && length(x) == 1L && !is.na(x)
}

然后:

if (missing(param1) || !isSingleString(param1)) {
  stop("param1 must be a single, non-NA string")
}