Question

我有以下矩阵

  IdCarrefour 10 11 12 13
1           2  3  8  5 NA
2           4 NA  4  1 NA
3           5 NA NA NA NA
4           6 NA  4  1 NA
5           7 NA NA NA NA

对于每个colomn我想要多少NA和我得到多少非NA。所以我使用了apply函数：

mTF<-apply(m,2,function(x) table(!is.na(x)))
> str(mTF)
List of 5
 $ IdCarrefour: 'table' int [1(1d)] 5
  ..- attr(*, "dimnames")=List of 1
  .. ..$ : chr "TRUE"
 $ 10         : 'table' int [1:2(1d)] 4 1
  ..- attr(*, "dimnames")=List of 1
  .. ..$ : chr [1:2] "FALSE" "TRUE"

其中mTF是一个列表。现在我想使用ggplot绘制堆积条形图。

所以我试图将mTF转换为data.frame。在其他相关帖子的帮助下，我提出了这两种方法：

data.frame(matrix(unlist(mTF), nrow=5, byrow=T),stringsAsFactors=FALSE)
Warning message:
In matrix(unlist(mTF), nrow = 5, byrow = T) :
  data length [8] is not a sub-multiple or multiple of the number of rows [5]

不适合我，因为我对每个级别都没有相同的因素（见警告）

do.call(rbind.data.frame, mTF)

不工作，因为它复制了缺失的等级（对于最后一行，我应该有0 T和5 F）。

            c.5L..4L..2L..2L..5L. c.5L..1L..3L..3L..5L.
IdCarrefour                     5                     5
10                              4                     1
11                              2                     3
12                              2                     3
13                              5                     5

那么有没有办法将我的列表（mTF）转换为我可以用来绘制的data.frame？

Answer 1

首先，我们需要对您的数据执行一些操作。请注意，我已将您的矩阵转换为名为data.frame的{{1}}：

df

列表中的堆积条形图

1 个答案: