R语言中do.call函数学习

虽然R语言有类型很丰富的数据结构,但是很多时候数据结构比较复杂,那么基本就会用到list这种结构的数据类型。但是list对象很难以文本的形式导出,因此需要一个函数能快速将复杂的list结构扁平化成dataframe。这里要介绍的就是do.call函数。

  这里是do.call 函数的官方文档:

do.call {base}R Documentation

Execute a Function Call

Description

do.call constructs and executes a function call from a name or a function and a list of arguments to be passed to it.

Usage

do.call(what, args, quote = FALSE, envir = parent.frame())

Arguments

whateither a function or a non-empty character string naming the function to be called.

argsalistof arguments to the function call. Thenamesattribute ofargs gives the argument names.

quotea logical value indicating whether to quote the arguments.

enviran environment within which to evaluate the call. This will be most useful ifwhat is a character string and the arguments are symbols or quoted expressions.

Details

IfquoteisFALSE, the default, then the arguments are evaluated (in the calling environment, not inenvir). IfquoteisTRUEthen each argument is quoted (seequote) so that the effect of argument evaluation is to remove the quotes – leaving the original arguments unevaluated when the call is constructed.

The behavior of some functions, such assubstitute, will not be the same for functions evaluated usingdo.call as if they were evaluated from the interpreter. The precise semantics are currently undefined and subject to change.

Value

The result of the (evaluated) function call.

Warning

This should not be used to attempt to evade restrictions on the use of.Internal and other non-API calls.

References

Becker, R. A., Chambers, J. M. and Wilks, A. R. (1988)The New S Language. Wadsworth & Brooks/Cole.



简单的讲,do.call 的功能就是执行一个函数,而这个函数的参数呢,放在一个list里面, 是list的每个子元素。

  看例子:

> tmp <- data.frame('letter'= letters[1:10],'number'=1:10,'value'= c('+','-'))> tmp

  letter number value1a1+2b2-3c3+4d4-5e5+6f6-7g7+8h8-9i9+10j10-> tmp[[1]]

[1] a b c d e f g h i j> tmp[[2]]

[1]12345678910> tmp[[3]]

[1] + - + - + - + - + ->do.call("paste", c(tmp, sep =""))

[1]"a1+""b2-""c3+""d4-""e5+""f6-""g7+""h8-""i9+""j10-"

  这里的tmp使用data.frame函数创建的,其实它本质上还是一个list,这里分别用[[]]符号显示他的三个元素,可以看到do.call函数把tmp的三个元素(三个向量)作为paste函数的参数。这个例子我们也可以这样写:

>paste(tmp[[1]],tmp[[2]],tmp[[3]], sep = "")

[1] "a1+"  "b2-"  "c3+"  "d4-"  "e5+"  "f6-"  "g7+"  "h8-"  "i9+"  "j10-"

可以看到两种结果是一模一样的。

  再举一个例子:

> number_add <- list(101:110,1:10)> number_add

[[1]]

[1]101102103104105106107108109110[[2]]

[1]12345678910> add <-function(x,y) {x + y}> addfunction(x,y) {x + y}>do.call(add, number_add)

[1]102104106108110112114116118120> add(number_add[[1]], number_add[[2]])

[1]102104106108110112114116118120


  最后回到开头,假如说我们有一个list对象,这个对象里面是格式一致的dataframe,我们需要将这个list对象合并成一个总的dataframe并输出成文本文件,那么可以这样做:

> list1

[[1]]

  up down number1A    a12B    b23C    c34D    d45E    e5[[2]]

  up down number1A    a12B    b23C    c34D    d45E    e5[[3]]

  up down number1A    a12B    b23C    c34D    d45E    e5>do.call("rbind",list1)

  up down number1A    a12B    b23C    c34D    d45E    e56A    a17B    b28C    c39D    d410E    e511A    a112B    b213C    c314D    d415E    e5

你可能感兴趣的:(R语言中do.call函数学习)