主页 / coding / 问题 / 78531734
Accepted
user18894435
Asked: 2024-05-25 15:41:06 +0800 CST

无法将tapply返回的列表转换为data.frame

  • 772

我正在使用 进行一些数据操作tapply()，它返回一个list类似对象。例如：

x <- 1:10
y <- rep(c('A', 'B'), each = 5)
lst.1 <- tapply(x, y, function(vec) return(vec), simplify = FALSE)
lst.1

# $A
# [1] 1 2 3 4 5
# 
# $B
# [1]  6  7  8  9 10

我想把它改造成data.frame. 直觉正在使用as.data.frame()，但失败了。

as.data.frame(lst.1)

#             lst1
# A  1, 2, 3, 4, 5
# B 6, 7, 8, 9, 10

我手动创建另一个列表来模仿lst.1，并按as.data.frame()加速方式工作。

lst.2 <- list(A = 1:5, B = 6:10)
lst.2

# $A
# [1] 1 2 3 4 5
# 
# $B
# [1]  6  7  8  9 10

as.data.frame(lst.2)

#   A  B
# 1 1  6
# 2 2  7
# 3 3  8
# 4 4  9
# 5 5 10

lst.1和 和有什么区别lst.2？tapply以及如何正确地将(ie )返回的列表转换lst.1为data.frame？

2 个回答

  1. Best Answer

    如果您查看 返回的列表的结构tapply()，您会发现它有一个维度属性，并且是一个列表和一个数组。

    str(lst.1)
List of 2
 $ A: int [1:5] 1 2 3 4 5
 $ B: int [1:5] 6 7 8 9 10
 - attr(*, "dim")= int 2
 - attr(*, "dimnames")=List of 1
  ..$ : chr [1:2] "A" "B"

is.array(lst.1)
[1] TRUE

    这意味着当您调用as.data.frame()在后台分派的方法时 isas.data.frame.array()和 not as.data.frame.list()。为了解决这个问题，您可以直接调用您想要使用的方法：

    as.data.frame.list(lst.1) 
  A  B
1 1  6
2 2  7
3 3  8
4 4  9
5 5 10

    或者使用：

    list2DF(lst.1)
  A  B
1 1  6
2 2  7
3 3  8
4 4  9
5 5 10
    • 2

  2. 从?tapply：

    如果FUN不返回单个原子值，则tapply返回“an arrayof mode list”，其组件是对 的各个调用的值FUN，即，结果是“具有属性的列表dim”。

    因此，lst.1实际上更接近于array，尽管它看起来像list。下表显示了它们在class、dim、 和方面的一些差异dimnames。

    class() dim() dimnames()
    lst.2 "list" 无效的 无效的
    lst.1 "array" 2 [[1]]
    [1]“A”“B”

    转换lst.1为 data.frame 的两种解决方案：

    1. 显式调用as.data.frame类的方法'list'：

      as.data.frame.list(lst.1)

    2. 用于c()将列表数组解开为普通列表：

      as.data.frame(c(lst.1))
    输出
      A  B
1 1  6
2 2  7
3 3  8
4 4  9
5 5 10
    • 2

相关问题