# Ecco come rappresentare una ripartizione percentuale con un
# diagramma a striscia
#      A     B     C    totale
#  %  15.5  47.8  36.7   100
# cbind unisce le righe di piu' colonne (se no barplot
# con height=c(15.5,47.8,36.7) farebbe tre colonne
barplot(height=cbind(c(15.5,47.8,36.7)),horiz=TRUE)
# ovvero:
barplot(height=cbind(c(15.5,47.8,36.7)),horiz=TRUE,axes=FALSE)
axis(1,c(0,15.5,15.5+47.8,100),col="white")
# ovvero (modificando poi 'a mano' l'altezza della finestra)
barplot(height=cbind(c(15.5,47.8,36.7)),horiz=TRUE, col=c("green","red","yellow"))
rug(seq(0,100,5),ticksize=-1/4)
rug(seq(0,100,1),ticksize=-1/8)