R help - Dec 2020 - Adding a superscript 6 to a number

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)

paste() is the problem.  don?t use paste with expression()

On Tue, Dec 29, 2020 at 10:50 Sorkin, John <jsorkin at 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
>
<https://www.google.com/maps/search/10+North+Greene+Street?entry=gmail&source=g>
> 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 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.
>
	[[alternative HTML version deleted]]

Does this do what you want?

plot(0:1, 0:1)
x <- .25
text(.5,.5, labels = bquote(.(x)^6, list(x= x)))


Bert Gunter

"The trouble with having an open mind is that people keep coming along and
sticking things into it."
-- Opus (aka Berkeley Breathed in his "Bloom County" comic strip )


On Tue, Dec 29, 2020 at 7:50 AM Sorkin, John <jsorkin at
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 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.
>
	[[alternative HTML version deleted]]