Maximaler Wert in Col einer Frequenztabelle in R Sprache

Question

Ich habe eine Häufigkeitstabelle erstellt (table(thing1, thing2)) und ich versuche, einen maximalen Wert für eine der Spalten zu finden. Hier ist mein Code:

apmData$bin <- as.factor(apmData$bin) 
apmBinTable <-table(apmData$bin, apmData$duration1) 
prop.table(apmBinTable, 1) 

Dies ist ein Bruchteil meiner Daten (schlecht bis gut ÖbVI):

bin id bad  good     
416082 0.010033445 0.989966555 
416084 0.017421603 0.982578397 
416085 0.023041475 0.976958525 
416086 0.019943020 0.980056980 
416087 0.005813953 0.994186047 
416093 0.017667845 0.982332155 
416095 0.015822785 0.984177215 

Hier ist mein Problem. Ich sehe keinen Weg, um den Maximalwert für die Spalte "schlecht" zu erhalten. Technisch "schlecht" und "gut" sind keine Spalten, da apmBinTable kein data.frame ist. Irgendwelche Vorschläge?

Answer 1

Ich würde die ganze Sache in dplyr wiederholen.

library(dplyr) 

apmData %>% 
    group_by(bin) %>% 
    summarise(bad = sum(duration1 == 'bad')/n()*100, 
      good = sum(duration1 == 'good')/n()*100) %>% 
    arrange(desc(bad)) 

Die Ungeschicklichkeit Tabellen der Verwendung einer der Hauptgründe war ich dplyr geschaltet!