Skip to content

barplots - text direction

4 messages · Murray Pung, Simon Blomberg, David Scott +1 more

#
If the variable names are too long to allow room for each to be displayed on a barplot, how can the direction of the text be changed?

a <- cbind(2.4,2.4,2.5,2.6,2.6,2.6,2.6,2.6,2.9,2.9,2.9)
b <- cbind(2.3,2.5,2.4,2.2,3.2,2.4,2.9,2.6,2.9,3.0,2.8)
h <- rbind(a,b)
colnames(h) <- c("one","two","three","four","five","six","seven","eight","nine","ten","eleven")
rownames(h) <- c("Pre-stage","Post-stage")
barplot(h, beside = T, legend = colnames(g), horiz = T, xlim = c(0, 5))


Many Thanks
Murray

Murray Pung | Research Analyst
AIM Research & HR Consulting
PO Box 328, Nth Sydney NSW 2060
P +61 (02) 9956 3951
F +61 (02) 9922 2210
www.aimsurveys.com.au
#
See las under ?par. You can often pass par parameters to higher-level 
graphics functions, so barplot(h, las=2) (for example) works.

HTH,

Simon.
At 11:27 AM 24/08/2005, Murray Pung wrote:
Simon Blomberg, B.Sc.(Hons.), Ph.D, M.App.Stat.
Centre for Resource and Environmental Studies
The Australian National University
Canberra ACT 0200
Australia
T: +61 2 6125 7800 email: Simon.Blomberg_at_anu.edu.au
F: +61 2 6125 0757
CRICOS Provider # 00120C
#
On Wed, 24 Aug 2005, Murray Pung wrote:

            
barplot(h, beside = T, legend = colnames(h), horiz = T, xlim = c(0, 5),
         las=1)

will do it.

Note: colnames(h) not colnames(g)


David Scott


_________________________________________________________________
David Scott	Department of Statistics, Tamaki Campus
 		The University of Auckland, PB 92019
 		Auckland	NEW ZEALAND
Phone: +64 9 373 7599 ext 86830		Fax: +64 9 373 7000
Email:	d.scott at auckland.ac.nz


Graduate Officer, Department of Statistics
#
On Wed, 24-Aug-2005 at 01:54PM +1200, David Scott wrote:

        
|> On Wed, 24 Aug 2005, Murray Pung wrote:
|> 
|> > If the variable names are too long to allow room for each to be displayed on a barplot, how can the direction of the text be changed?
|> >
|> > a <- cbind(2.4,2.4,2.5,2.6,2.6,2.6,2.6,2.6,2.9,2.9,2.9)
|> > b <- cbind(2.3,2.5,2.4,2.2,3.2,2.4,2.9,2.6,2.9,3.0,2.8)
|> > h <- rbind(a,b)
|> > colnames(h) <- c("one","two","three","four","five","six","seven","eight","nine","ten","eleven")
|> > rownames(h) <- c("Pre-stage","Post-stage")
|> > barplot(h, beside = T, legend = colnames(g), horiz = T, xlim = c(0, 5))
|> >
|> >
|> 
|> barplot(h, beside = T, legend = colnames(h), horiz = T, xlim = c(0, 5),
|>          las=1)
|> 
|> will do it.
|> 
|> Note: colnames(h) not colnames(g)

And note that rownames(h) will give a more sensible legend.