Displaying 2 results from an estimated 2 matches for "midpointsmp".
Did you mean:
midpoints
2010 Oct 29
2
make many barplot into one plot
...)empat <- array(c(25,13,50,78,19,34,84,101), dim=c(2,4), dimnames=list(c("Negative", "Positive"), c("Black", "Brown", "Red", "Blond")))# rbind() the tables togetherTAB <- rbind(satu, dua, tiga, empat)# Do the barplot and save the bar midpointsmp <- barplot(TAB, beside = TRUE, axisnames = FALSE)# Add the individual bar labelsmtext(1, at = mp, text = c("N", "P"),line = 0, cex = 0.5)# Get the midpoints of each sequential pair of bars# within each of the four groupsat <- t(sapply(seq(1, nrow(TAB), by = 2),function(x)...
2010 Oct 31
1
R-help Digest, Vol 92, Issue 31
...pat <- array(c(25,13,50,78,19,34,84,101), dim=c(2,4),
dimnames=list(c("Negative", "Positive"), c("Black", "Brown", "Red", "Blond")))#
rbind() the tables togetherTAB <- rbind(satu, dua, tiga, empat)# Do the barplot
and save the bar midpointsmp <- barplot(TAB, beside = TRUE, axisnames = FALSE)#
Add the individual bar labelsmtext(1, at = mp, text = c("N", "P"),line = 0, cex
= 0.5)# Get the midpoints of each sequential pair of bars# within each of the
four groupsat <- t(sapply(seq(1, nrow(TAB), by = 2),function(...