如何格式化表

Question

我正在研究R并且在显示表格时遇到了问题格式的问题。

> p <- rpois(100,5)
> cluster_p <- kmeans(p,3)
> table(cluster_p$cluster)

 1  2  3 
36  4 60 
> table(cluster_p$centers,table(cluster_p$cluster))

                   4 36 60
  3.43333333333333 0  0  1
  6.77777777777778 0  1  0
  9.5              1  0  0

但是我必须按照下面给出的格式显示表格。

cluster_id | center | total_no
1           6.77       36
2           9.5        4
3           3.43       60  

我怎样才能做到这一点？

Answer 1

只需创建一个数据框：

cluster = as.data.frame(table(cluster_p$cluster))

data.frame(cluster_id=cluster[,1],
           center=cluster_p$centers,
           total_no=cluster[,2])

##   cluster_id   center total_no
## 1          1 3.020408       49
## 2          2 8.700000       10
## 3          3 5.731707       41

ps：表条目不同，因为您没有在示例中设置种子。