Question

我试图将一个非常简单的1x4 tibble转换为数组：

library(tidyverse)
temp <- tibble(x=0,y=1,z=1,w=1)
array(temp)

它给我以下错误消息：

mapply出错（FUN = f，...，SIMPLIFY = FALSE）：零长度输入不能与非零长度的输入混合另外：警告信息： 1：在is.na（x）中：is.na（）应用于'NULL'类型的非（列表或向量） 2：在is.na（x）中：is.na（）应用于'NULL'类型的非（列表或向量）

在数组函数中，似乎dim(data) <- dim部分是问题...我确实找到了一个解决方案，即将tibble转换为数据帧：

array(as.data.frame(temp))

但我不太清楚为什么我要经历一个额外的步骤。有人能告诉我我错过了什么吗？

Answer 1

从tibble版本1.4.2开始，无法再复制此行为。对于将来的参考，我留下以下记录：

> library(tidyverse)
> versions::installed.versions("tibble")
[1] "1.4.2"
> temp <- tibble(x=0,y=1,z=1,w=1)

> array(temp)
# A tibble: 1 x 4
  <dbl> <dbl> <dbl> <dbl>
1    0.    1.    1.    1.
> array(as.data.frame(temp))
1 0 1 1 1
> simplify2array(temp)
x y z w 
0 1 1 1

> dim(array(temp))
[1] 1 4
> dim(as.data.frame(array(temp)))
[1] 1 4
> dim(simplify2array(temp))
NULL

> class(array(temp))
[1] "tbl_df"     "tbl"        "data.frame"
> class(as.data.frame(array(temp)))
[1] "data.frame"
> class(simplify2array(temp))
[1] "numeric"

> as.array(temp)
Error in `dimnames<-.data.frame`(`*tmp*`, value = list(n)) : 
  invalid 'dimnames' given for data frame

我可以使用simplify2array来创建如下所示的3D数组，但不幸的是，当我提出这个问题时，我不太清楚我的目的是什么。

simplify2array(by(temp, temp$x, as.matrix))

在R中无法将tibble转换为数组？

1 个答案: