R barplot empilés

Question

J'ai la trame de données suivante:

Var1 Var2 
FALSE FALSE 
FALSE TRUE 
TRUE FALSE 
FALSE TRUE 
FALSE FALSE 

Question 1: Quand on regarde seulement 1 colonne, comment puis-je générer simple barplot Stacked (tous les faux au-dessus de trues)? Question 2: Comment puis-je mettre ces deux barres (empilées) les unes à côté des autres dans une seule parcelle?

J'ai besoin de ces parcelles dans le cadre d'une mission et je ne suis pas autorisé à utiliser des bibliothèques externes (tels que ggplot)

merci

Answer 1

Les questions ont déjà été répondues mais je fournirai le mien de toute façon puisque j'ai déjà fait le travail. :)

df<-data.frame(Var1=c(FALSE, FALSE, TRUE, FALSE, FALSE), 
        Var2=c(FALSE, TRUE, FALSE, TRUE, FALSE)) 
    barplot(t(rbind(Var1=table(df$Var1), var2=table(df$Var2)))) 

Answer 2

Vos données:

dat<-read.table(text="Var1 Var2 
FALSE FALSE 
FALSE TRUE 
TRUE FALSE 
FALSE TRUE 
FALSE FALSE", header = TRUE) 

Il fonctionne avec

barplot(rbind(colSums(dat), colSums(!dat)))