Question

我正在与RODBC和parallel合作，针对某些内部报告对数据系统进行多次查询。为了便于建立新连接，我将从RODBC对象中提取连接字符串。为此，我计划使用attributes()。但是，我遇到了一个我不理解的行为。一个最小的工作示例如下：

> example.data <- data.frame(letters = sample(x = LETTERS,size = 20,replace = T),
+                            numbers = sample(x = 0:9,size = 20,replace = T))
> 
> attributes(obj = example.data)
Error in attributes(obj = example.data) : 
  supplied argument name 'obj' does not match 'x'
> attributes(example.data)
$names
[1] "letters" "numbers"

$row.names
 [1]  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20

$class
[1] "data.frame"

应该注意的是，obj =行为是RStudio建议的一个标签。但是，它会导致错误。我试着检查attributes的源代码，但它是原始的，所以我不得不深入研究C源代码 - 我对此并不熟悉。

为什么attributes()在使用显式参数（obj =）时失败，但在不使用时运行正常？（并且应该改变RStudio关于建议obj =的行为吗？）

Answer 1

这似乎是属性文档中的错误。参数可能应该命名为x。你可以这样称呼

attributes(x = example.data)

问题是attributes()是原始函数，原始函数的行为与R中的常规函数不同。它们没有形式参数（formals(attributes)返回NULL）。对于这些类型的函数，R通常不会按名称解析参数，并且出于效率原因将假设它们处于某个位置顺序。这就是为什么最好不要命名它们，因为你无法改变这些参数的顺序。这里不需要命名参数。

还有其他功能，文档中的参数名称与代码检查的值不匹配。例如

isS4(pi)
# [1] FALSE
# documented parameter name is "object"
isS4(object=pi)
# Error in isS4(object = pi) : 
#   supplied argument name 'object' does not match 'x'
isS4(x=pi)
# [1] FALSE

但是还有其他原语使用x以外的名称：例如seq_along（使用＆＃34; along.with =＆＃34;）和quote（使用＆＃34; expr =＆＃34;）。

使用显式参数时，为什么R的attributes（）函数失败？

1 个答案: