0

我对表格功能有疑问。我显然没有使用正确的功能或没有正确执行它。它将 ContactCode 列与 12 月相结合，我需要将它们分开。使用 Table 函数时，如何指定 ContactCode 是它自己的列？

Map = HeatMapCC[,c('ContactCode','Month')]
Map = table(Map$ContactCode,Map$Month)

输出

      Dec Jan
  101 219 315
  103  37  47
  104  69  72
  110  26  60
  112  41  24
  113  18  28

期望的输出

  ContactCodes    Dec Jan
  101             219 315
  103             37  47
  104             69  72
  110             26  60
  112             41  24
  113             18  28

> str(Map)
 'table' int [1:26, 1:2] 219 37 69 26 41 18 106 2 26 19 ...
 - attr(*, "dimnames")=List of 2
  ..$ : chr [1:26] "101" "103" "104" "110" ...
  ..$ : chr [1:2] "Dec" "Jan"
4

1 回答 1

1

如果您的输出被调用Map，请执行以下操作：

Map <- cbind(ContactCode=rownames(Map), Map)

正如 Hong 指出的那样，如果行名不是全部数字，您可能会得到不需要的强制值。您可以在这些情况下使用data.frame代替cbind。IE：

Map <- data.frame(ContactCode=rownames(Map), Map)

请注意，在任何一种情况下，如果您不喜欢在将它们添加为列后仍然存在的行名的外观，您可以删除它们： 

rownames(Map) <- NULL
Map
  ContactCode Dec Jan
1         101 219 315
2         103  37  47
3         104  69  72
4         110  26  60
5         112  41  24
6         113  18  28
于 2013-07-30T19:52:09.857 回答