An embedded and charset-unspecified text was scrubbed... Name: not available URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130226/26b59c13/attachment.pl>
How to avoid overlapping labels
2 messages · john55, Jim Lemon
On 02/27/2013 05:20 AM, john55 wrote:
Hi Remko, thanks for your answer. but i do not really understand how to use the commands. if i want to use thigmophobe.labels(x,y,) do i need to identify the xy coordinates for each point first and then manually move every point? and if i neet to do so how to use the identify() function? or is there any possibility to automatically place the labels in the best position?
MatArab<- as.matrix(ende[2:12]) MatArab MCAArab<- mjca(MatArab, nd = 2, lambda = "JCA", maxit = 50, epsilon =
0.0001)
>plot(MCAArab, dim = c(1,2), map = "symmetric", centroids = TRUE,
+ what = c("none", "all"), mass = c(FALSE, FALSE),
+ contrib = c("none", "none"), col = c("#000000", "#FF0000"))
<http://r.789695.n4.nabble.com/file/n4659710/lllll.jpeg>
Hi john55, Looking at your example, it is clear that thigmophobe.labels will not get all of the labels right. However, it would only be necessary to manually change a few label positions to get it right. Say your coordinates are labelled "x" nd "y". First get the offsets: textpos<-thigmophobe(x,y) I count eight labels that need to be moved. Take the two overlapping labels at about x=c(-0.75,-0.55) and y=c(0.2,0.2). These two will probably be left overlapping by thigmophobe, probably both with a textpos value of 4. Change the textpos value of the leftmost label to 2. Then replot with thigmophobe labels using text.pos=textpos. Do the same for the other labels until none overlap. If this is too much trouble, try the spread.lab function in the TeachingDemos package. It is a better algorithm, but not as easy to call as thigmophobe. Jim