Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/72.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 将向量列表追加到向量列表中_R - Fatal编程技术网

R 将向量列表追加到向量列表中

R 将向量列表追加到向量列表中,r,R,设x为向量列表: a <-list( c(1,2,3), c(4,5,6), c(7,8) ,c(9) ) b <-list(c(11,22,33),c(44,55,66), c(77,88) ,c(99) ) x <- list(a=a,b=b) Akrun和gfgm的答案摘要 Map(c,a,b) do.call(Map,c(f=“c”,unname(x)) mapply(函数(i,j){c(i,j)},a,b) 这是mapply() a[1]12311223

x
为向量列表:

 a <-list( c(1,2,3),   c(4,5,6), c(7,8) ,c(9) )
 b <-list(c(11,22,33),c(44,55,66), c(77,88) ,c(99) )
 x <- list(a=a,b=b)

Akrun和gfgm的答案摘要

  • Map(c,a,b)
  • do.call(Map,c(f=“c”,unname(x))
  • mapply(函数(i,j){c(i,j)},a,b)

  • 这是
    mapply()

    a[1]123112233
    #> 
    #> [[2]]
    #> [1]  4  5  6 44 55 66
    #> 
    #> [[3]]
    #> [1]  7  8 77 88
    #> 
    #> [[4]]
    #> [1]  9 99
    
    您可以尝试
    映射(c,a,b)
    (根据示例中的更改进行更改)谢谢@akrun!!对我必须了解
    lappy()
    ,我还认为使用了'lappy()',但不确定!!对不起,咖啡馆马上就要关门了!!我只能在24小时后回复。另外,如果您已经创建了
    列表
    “x”,那么
    do.call(Map,c(f=c,unname(x))
    更准确地说,
    do.call(Map,c(f=“c”,unname(x))
    >foo(x)
    
     list(c(1,2,3,11,22,33),c(4,5,6,44,55,66),c(7,8,77,88),c(9,99)