如何在R中创建给定的特定数据透视表？

Question

我需要从下面给出的数据框架创建数据透视表：

请帮助我获得下面给出的数据透视表（我已从excel复制）：

我需要完全给出使用R。

要生成类似的数据集，您可以使用下面给出的命令：

enter code here

Data1 <- data.frame(
X = sample(1:10),
Y = sample(1:10), 
Z = sample(1:10),
count= sample(11:20))

提前致谢！

Answer 1

尝试ftable：

exData <- setNames(as.data.frame(unique(t(combn(rep(1:3, 3), m=3)))), paste0("P", 1:3))
ftable(exData)