# [R] [External] Re: [External] Adding a superscript 6 to a number

Richard M. Heiberger rmh @end|ng |rom temp|e@edu
Tue Dec 29 23:56:34 CET 2020

```It is a generalization.
Don't use paste() and expression() together because paste is a sort-of
inverse to expression.
In this example I start by typing several characters, and the result
of paste(expression()) is a string containing the characters I
initially typed.

> expression(12^6)
expression(12^6)
> paste(expression(12^6))
[1] "12^6"

expression(12^6)
paste(expression(12^6))

plot(0:1, 0:1)
text(.1, .4, labels=paste(expression(12^6)))
text(.1, .3, labels=expression(12^6))

On Tue, Dec 29, 2020 at 4:15 PM Jeff Newmiller <jdnewmil using dcn.davis.ca.us> wrote:
>
> Why not? Is that a generalization, or specific to this case?
>
> On December 29, 2020 7:54:22 AM PST, "Richard M. Heiberger" <rmh using temple.edu> wrote:
> >paste() is the problem.  don’t use paste with expression()
> >
> >On Tue, Dec 29, 2020 at 10:50 Sorkin, John <jsorkin using som.umaryland.edu>
> >wrote:
> >
> >> Colleagues,
> >>
> >> I would like to create a number (stored in the variable x) to the
> >number
> >> with the exponent of, i.e. the number to the sixth power. The code I
> >have
> >> tried, pasted below does not work.
> >>
> >> # create plot
> >> plot(x=0.2,y=0.2,xlim=c(0,1),ylim=c(0,1))
> >> PNotSusp=0.69
> >> # Create a string containing the base and exponent.
> >> x <- 0.95123
> >> # Convert the base to text and add the exponent of 6
> >> mylab <- expression(paste(" ",character(x)^6))
> >> # Add the text to the plot
> >> text(0.4,0.8,labels=paste(PNotSusp,"=\n",mylab))
> >>
> >> I hope someone can show me how to create the text string I need.
> >>
> >> Thank you,
> >> John
> >>
> >> John David Sorkin M.D., Ph.D.
> >> Professor of Medicine
> >> Chief, Biostatistics and Informatics
> >> University of Maryland School of Medicine Division of Gerontology and
> >> Geriatric Medicine
> >> Baltimore VA Medical Center
> >> 10 North Greene Street
> >>
> >> GRECC (BT/18/GR)
> >> Baltimore, MD 21201-1524
> >> (Phone) 410-605-7119
> >> (Fax) 410-605-7913 (Please call phone number above prior to faxing)
> >>
> >>
> >> ______________________________________________
> >> R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> >> https://stat.ethz.ch/mailman/listinfo/r-help
> >> http://www.R-project.org/posting-guide.html
> >> and provide commented, minimal, self-contained, reproducible code.
> >>
> >
> >       [[alternative HTML version deleted]]
> >
> >______________________________________________
> >R-help using r-project.org mailing list -- To UNSUBSCRIBE and more, see
> >https://stat.ethz.ch/mailman/listinfo/r-help