Hi Joachim, This function allows the user to set some characters in a string to superscript or subscript. If sup or sub are set to one or more numbers corresponding to an index in the string, those letters will be placed appropriately. I can't properly test this as there is some problem with X11 fonts that has appeared with the upgrade to R 3.2.0 and the cex argument seems to have no effect.
supsubtext<-function(x,y,label,sup=NA,sub=NA,cex=1,sscex=0.8,xadj=0,...) { nlabchar<-nchar(label) yadj<-rep(0.5,nlabchar) if(!is.na(sup)) yadj[sup]<-0 if(!is.na(sub)) yadj[sub]<-1 labbits<-strsplit(label,"")[[1]] currentx<-x for(labchar in 1:nlabchar) { text(x,y,labbits[labchar],adj=c(xadj,yadj[labchar]), cex=ifelse(yadj[labchar]!=0.5,sscex,cex),...) x<-x+strwidth(labbits[labchar]) } } Jim On Thu, Apr 23, 2015 at 11:02 PM, Joachim Audenaert <joachim.audena...@pcsierteelt.be> wrote: > Is there also a version for non parametric tests like: > > pairwise.wilcox.test {stats} > > > > Met vriendelijke groeten - With kind regards, > > Joachim Audenaert > onderzoeker gewasbescherming - crop protection researcher > > PCS | proefcentrum voor sierteelt - ornamental plant research > > Schaessestraat 18, 9070 Destelbergen, België > T: +32 (0)9 353 94 71 | F: +32 (0)9 353 94 95 > E: joachim.audena...@pcsierteelt.be | W: www.pcsierteelt.be > > > > From: David L Carlson <dcarl...@tamu.edu> > To: Joachim Audenaert <joachim.audena...@pcsierteelt.be>, > "r-help@r-project.org" <r-help@r-project.org> > Date: 23/04/2015 14:51 > Subject: RE: [R] - Obtaining superscripts to affix to means that > are not significantly different from each other with R > > > > The function cld() in package multcomp generates compact letter displays, > but does not format them as exponents of the group names. > > ------------------------------------- > David L Carlson > Department of Anthropology > Texas A&M University > College Station, TX 77840-4352 > > -----Original Message----- > From: R-help [mailto:r-help-boun...@r-project.org] On Behalf Of Joachim > Audenaert > Sent: Thursday, April 23, 2015 4:58 AM > To: r-help@r-project.org > Subject: [R] - Obtaining superscripts to affix to means that are not > significantly different from each other with R > > Hello all, > > It is often time consuming to interpret p-values of multiple pairwise > comparisons of groups and assign them a letter code for publication > purposes. So I found this interesting link to a program that does this for > > you. > > http://www.jerrydallal.com/lhsp/similar.htm > > I was wondering if something similar exists in R? > > > Met vriendelijke groeten - With kind regards, > > Joachim Audenaert > onderzoeker gewasbescherming - crop protection researcher > > PCS | proefcentrum voor sierteelt - ornamental plant research > > Schaessestraat 18, 9070 Destelbergen, Belgi� > T: +32 (0)9 353 94 71 | F: +32 (0)9 353 94 95 > E: joachim.audena...@pcsierteelt.be | W: www.pcsierteelt.be > > Heb je je individuele begeleiding bemesting (CVBB) al aangevraagd? | Het > PCS op LinkedIn > Disclaimer | Please consider the environment before printing. Think green, > > keep it on the screen! > [[alternative HTML version deleted]] > > > > > Heb je je individuele begeleiding bemesting (CVBB) al aangevraagd? | Het > PCS op LinkedIn > Disclaimer | Please consider the environment before printing. Think green, > keep it on the screen! > > [[alternative HTML version deleted]] > > ______________________________________________ > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see > 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. ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.