分配函数的输出到两个变量中的R

Question

可能重复：
function with multiple outputs

这似乎是一个简单的问题，但我不出来，我的天堂”在我看过的R手册中运气不错。我想查找dim(x)，但我想在一行中分配dim(x)[1]到a和dim(x)[2]到b。

我试过[a b] <- dim(x)和c(a, b) <- dim(x)，但都没有工作。有没有一种方法可以做到这一点？这似乎是一件非常基本的事情，应该很容易处理。

Answer 1

这可能不是那么简单，你本来想一个解决方案，但是这能够完成任务。如果你需要一次分配多个变量（你不知道你有多少个值），它也是一个非常方便的工具。

Output <- SomeFunction(x) 
VariablesList <- letters[1:length(Output)] 
for (i in seq(1, length(Output), by = 1)) { 
    assign(VariablesList[i], Output[i]) 
} 

循环不是R中最有效的东西，但我多次使用过这个。我个人发现，在从具有未知数量条目的文件夹收集信息时特别有用。

编辑：而在这种情况下，输出可以是任何长度（只要VariablesList更长）。

编辑＃2：改变了VariablesList向量以允许更多的值，正如Liz所建议的。

Answer 2

这取决于a和b中的内容。如果他们只是数字试图返回一个向量是这样的：

dim <- function(x,y) 
    return(c(x,y)) 
dim(1,2)[1] 
# [1] 1 
dim(1,2)[2] 
# [1] 2 

如果a和b是别的东西，你可能要返回一个列表

dim <- function(x,y) 
    return(list(item1=x:y,item2=(2*x):(2*y))) 
dim(1,2)[[1]] 
[1] 1 2 
dim(1,2)[[2]] 
[1] 2 3 4 

编辑：

试试这个：x <- c(1,2); names(x) <- c("a","b")

Answer 3

看起来没有办法做到这一点。真正对付它的唯一方法是添加额外的行一对夫妇：

temp <- dim(x) 
a <- temp[1] 
b <- temp[2] 

Answer 4

您也可以编写自己的函数，它将始终创建一个全局函数a和b。但是，这是不可取的：

mydim <- function(x) { 
    out <- dim(x) 
    a <<- out[1] 
    b <<- out[2] 
} 

的“R”的方式来做到这一点是输出的结果作为一个列表或向量就像根据需要内置的功能也和访问它们：

out <- dim(x) 

out[1] 

out[2] 

R有很多其他语言缺乏的优秀列表和矢量理解，因此没有这种多重分配功能。相反，它有一组丰富的函数，可以在没有循环构造的情况下进入复杂的数据结构。