[R] - Obtaining superscripts to affix to means that are not significantly different from each other with R

[Jim Lemon]

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.Audenaert at 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.audenaert at pcsierteelt.be | W: www.pcsierteelt.be
>
>
>
> From:   David L Carlson <dcarlson at tamu.edu>
> To:     Joachim Audenaert <Joachim.Audenaert at pcsierteelt.be>,
> "r-help at r-project.org" <r-help at 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-bounces at r-project.org] On Behalf Of Joachim
> Audenaert
> Sent: Thursday, April 23, 2015 4:58 AM
> To: r-help at 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.audenaert at 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 at 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.