eksik değerlerin frekansları (uygulanır) ve masa()

Question

Ben basit bir matris var ve frekansları hesaplamak için bir işlev uygulamak kullanarak ekleyin: Ben tabloları bir listesi var uygulandıktan sonra

testM <- matrix(c(rep(1,3), rep(0,3)), ncol = 2, byrow = T) 

> testM 
    [,1] [,2] 
[1,] 1 1 
[2,] 1 0 
[3,] 0 0 

r <- apply(testM, 1, function(x) { table(x) }) 

x Frq x.1 F.1 x.2 F.2 
1 2 0 1 0 2 
1 2 1 1 0 2 

Bu sonuç sütun çiftlerini alarak okunur. Gördüğünüz gibi, tablo() işlevi sadece 0 ve 1'leri sayıyorum o "tahmin" ve sıklık 2 ile başka 1 koyar (veya başka 0 FRQ 2 ile) Ben

x Frq x.1 F.1 x.2 F.2 
1 2 0 1 1 0 
0 0 1 1 0 2 

beklenen gelmez Herhangi bir fikir veya daha iyi çözümler?

Answer 1

Biz Belirtilen levels

apply(testM, 1, function(x) table(factor(x, levels=0:1))) 

ile factor her vector dönüştürmek gerekir