Hi Hans,
strwrap is your friend. "\n" inserts a cr in a line of text.
wordwrap<-function(x,len) paste(strwrap(x,width=len),collapse="\n")
par(mar=c(11,3,2,1))
tmp<-plot(c,axes=F)
axis(2)
axis(1,at=tmp,labels=sapply(levels(c),wordwrap,len=15),padj=1)
box()
For unique abbreviations see ?abbreviate
hth.
Hans Ekbrand schrieb:
c <- structure(c(2L, 2L, 1L, 3L, 4L, 2L, 3L, 2L, 3L, 2L, 5L), .Label = c("foo",
+ "bar", "a really really long variable label mostly here to show the need of word-wrapping text in labels",
+ "a not so important value", "baz"), class = "factor")
plot(c)
Is there a way to get the long variable labels to automatically wrap so that
all labels can be shown?
Alternatively, is there a way to get the labels truncated, possibly with ".."
appended?
------------------------------------------------------------------------
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
--
Eik Vettorazzi
Institut für Medizinische Biometrie und Epidemiologie
Universitätsklinikum Hamburg-Eppendorf
Martinistr. 52
20246 Hamburg
T ++49/40/42803-8243
F ++49/40/42803-7790
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
