Wie unterteilen Sie ein Tabellenobjekt in R?

Question

Wie kann ich eine Tabelle basierend auf Werten unterteilen und diese Werte zurückgeben? Dies gibt nur Indizes:

with(chickwts, table(feed)) 
with(chickwts, table(feed)) > 11 
which(with(chickwts, table(feed)) > 11) 

Ausgabe

> with(chickwts, table(feed)) 
feed 
    casein horsebean linseed meatmeal soybean sunflower 
     12  10  12  11  14  12 
> with(chickwts, table(feed)) > 11 
feed 
    casein horsebean linseed meatmeal soybean sunflower 
    TRUE  FALSE  TRUE  FALSE  TRUE  TRUE 
> which(with(chickwts, table(feed)) > 11) 
    casein linseed soybean sunflower 
     1   3   5   6 

Answer 1

Sie müssen zweimal den berechneten Wert verwenden, so dass sie nützlich, um eine Zwischengröße zu verwenden:

x <- with(chickwts, table(feed)) 
x[x>11] 
feed 
    casein linseed soybean sunflower 
     12  12  14  12 

Answer 2

Hier ist ein anderer Ansatz ist Verwendung der Filter Funktion:

Filter(function(x) x > 11, with(chickwts, table(feed))) 
feed 
    casein linseed soybean sunflower 
     12  12  14  12 

Answer 3

Eine weitere Option Basisfunktionen:

subset(data.frame(table(chickwts$feed)), Freq > 11) 

Ergebnis:

 Var1 Freq 
1 casein 12 
3 linseed 12 
5 soybean 14 
6 sunflower 12 

---

die dplyr Paket verwenden:

library(dplyr) 
chickwts %>% 
    count(feed) %>% 
    filter(n > 11) 

Ergebnis:

Source: local data frame [4 x 2] 

     feed n 
1 casein 12 
2 linseed 12 
3 soybean 14 
4 sunflower 12