我有以下代码在 R :
中创建分类表> table(class = class1, truth = valid[,1])
1 2 3 4 5 6 7 8 9 10 11 12
1 357 73 0 0 47 0 5 32 20 0 4 7
2 25 71 0 0 23 4 1 0 2 1 8 3
3 1 2 120 1 5 0 1 0 0 0 0 0
4 0 0 0 77 0 0 0 0 1 0 0 0
5 15 27 0 0 67 6 7 0 4 1 5 7
6 1 2 0 0 2 44 0 0 0 7 7 0
7 1 1 0 0 10 0 66 0 1 0 1 7
9 1 0 0 0 3 0 0 2 8 0 0 2
10 1 1 0 0 1 6 0 0 0 17 0 0
11 0 7 0 0 3 1 0 0 0 4 10 2
12 0 1 0 0 1 0 0 0 0 0 0 1
但是,我需要这个表是一个正方形(在这个例子中缺少第8行),即行数应该等于列数,我需要保留rownames和colnames。丢失的行应填充零。这样做的任何方式?
答案 0 :(得分:1)
问题很可能来自于等级的差异。
尝试将关卡从valid
复制到class1
:
class1 <- factor(class1, levels=levels(valid[,1])
table(class = class1, truth = valid[,1])