使用xtabs函数创建一个包含列名的表

Question

我遇到了xtabs功能问题。 我一直在使用xtabs从数据框创建表。我试图找出列名称与命令，名称（）。 R响应＆＃34; NULL＆＃34;。

为什么会这样，以及如何将此xtabs表转换为具有列名的表或数据框。

ftable函数没有提供我需要的东西。

Answer 1

假设您希望数据集看起来类似于xtabs(..)结果列：

 dat <- structure(list(cntry1 = c("usa", "usa", "usa", "canada", "canada", 
 "cuba"), cntry2 = c("canada", "bahamas", "cuba", "bahamas", "cuba", 
 "bahamas"), var1 = c(70L, 29L, 39L, 15L, 35L, 5L)), .Names = c("cntry1", 
 "cntry2", "var1"), class = "data.frame", row.names = c(NA, -6L
 ))

 r1 <- xtabs(var1~cntry2+cntry1, dat)
 as.data.frame.matrix(r1)
 #         canada cuba usa
 #bahamas     15    5  29
 #canada       0    0  70
 #cuba        35    0  39