Use par(xpd=TRUE).
On Wed, 18 Jan 2006, paul sorenson wrote:
> I have been trying to find which par settings can help me avoid
> truncated text at the bottom of the y axis in a mosaic plot (created
> when I plot a result of a 2d xtabs) without much success. Using las=1
> has helped but the text (the "500+" level) is still cropped.
>
> I get the same result on XP/2.2.0 and FC4/2.2.1.
>
> Any tips would be appreciated.
>
> # dput(foo.df)
> > foo.df = structure(list(vol1 = structure(c(1, 2, 3, 4, 5, 6, 1, 2, 3,
> 4, 5, 6, 1, 2, 3, 4, 5, 6, 1, 2, 3, 4, 5, 6, 1, 2, 3, 4, 5, 6
> ), .Label = c("<100", "101-250",
"251-500", "501-750", "751-1000",
> "1000+"), class = "factor"), vol2 = structure(c(1, 1,
1, 1, 1,
> 1, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 5, 5,
> 5, 5, 5, 5), .Label = c("<20", "20-50",
"50-100", "100-500",
> "500+"), class = "factor"), Freq = c(4, 3, 0, 0, 2, 0,
4, 3,
> 6, 4, 1, 2, 1, 3, 3, 4, 5, 2, 3, 1, 3, 2, 2, 12, 0, 0, 1, 0,
> 2, 4)), .Names = c("vol1", "vol2", "Freq"),
row.names = c("1",
> "2", "3", "4", "5", "6",
"7", "8", "9", "10", "11",
"12", "13",
> "14", "15", "16", "17",
"18", "19", "20", "21", "22",
"23", "24",
> "25", "26", "27", "28",
"29", "30"), class = "data.frame")
>
> > xtabs(Freq ~ vol1 + vol2, data=foo.df)
> vol2
> vol1 <20 20-50 50-100 100-500 500+
> <100 4 4 1 3 0
> 101-250 3 3 3 1 0
> 251-500 0 6 3 3 1
> 501-750 0 4 4 2 0
> 751-1000 2 1 5 2 2
> 1000+ 0 2 2 12 4
>
> > plot(xtabs(Freq ~ vol1 + vol2, data=foo.df))
> > plot(xtabs(Freq ~ vol1 + vol2, data=foo.df), las=1)
>
> ______________________________________________
> R-help at stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide!
http://www.R-project.org/posting-guide.html
>
--
Brian D. Ripley, ripley at stats.ox.ac.uk
Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/
University of Oxford, Tel: +44 1865 272861 (self)
1 South Parks Road, +44 1865 272866 (PA)
Oxford OX1 3TG, UK Fax: +44 1865 272595