using `plotmath` to display combination of subscript and `[ ]`

Question

I want to create a plot where I want to display a mean value and confidence intervals for this mean value. To do so, I am using plotmath. Here is something I have done that works-

library(ggplot2)

ggplot(mtcars, aes(as.factor(cyl), wt)) + geom_boxplot() +
  labs(
    title = "Mean weight:",
    subtitle = parse(text = paste(
      "list(~italic(mu)==", 3.22, ",", "CI[95~'%'] ", "(", 2.87, ",", 3.57, "))",
      sep = ""
    ))
  )

^{Created on 2019-08-25 by the reprex package (v0.3.0)}

But this is not what I actually want. The format in which I instead want to display these results is the following-

So there are two things I can't seem to figure out how to do using plotmath:

95 % should instead be 95%
Use [ instead of (

How can I do this?

P.S. It is important, for reasons to complicated to explain here, for me to have list inside the paste function because I want to save these expressions as a character-type column in a dataframe. This is why I haven't accepted the two solutions provided below.

G. Grothendieck · Accepted Answer · 2019-08-26 00:09:24Z

4

Use the formula shown:

ggplot(mtcars, aes(as.factor(cyl), wt)) + geom_boxplot() +
  labs(
    title = "Mean weight:",
    subtitle = ~italic(mu) == 3.22*', '*"CI"[95*'%']*group('[',2.87*','*3.57,']')
  )

answered Aug 26, 2019 at 0:09

G. Grothendieck

273k18 gold badges221 silver badges365 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Indrajeet Patil Over a year ago

Thanks. I would prefer a solution that doesn't change the code specified in the question though. I want to use list + paste because I am saving these expressions as columns of type of character.

G. Grothendieck Over a year ago

Just define the same expression as a character string in which case you can paste it together from elements in any way you like. subtitle <- "italic(mu) == 3.22*', '*'CI'[95*'%']*group('[',2.87*','*3.57,']')" Then use this in ggplot: subtitle = parse(text = subtitle)

Edo · Accepted Answer · 2019-12-03 15:19:07Z

3

+100

This solution keeps list and paste.

library(ggplot2)

ggplot(mtcars, aes(as.factor(cyl), wt)) + geom_boxplot() +
  labs(
    title = "Mean weight:",
    subtitle = parse(text = paste(
      "list(~italic(mu)==", 3.22, ",", "CI[95*'%'] ", "*'['*", 2.87, ",", 3.57, "*']')",
      sep = ""
    ))
  )

answered Dec 3, 2019 at 15:19

Edo

7,8982 gold badges13 silver badges21 bronze badges

Comments

akrun · Accepted Answer · 2019-08-26 00:07:38Z

3

An option would be bquote

library(ggplot2)
ggplot(mtcars, aes(as.factor(cyl), wt)) + 
       geom_boxplot() +
       labs(title = "Mean weight:", 
        subtitle = bquote(italic(mu)~"= 3.22,"~CI[95*'%']~"["*"2.87, 3.57"*"]"))

edited Aug 26, 2019 at 0:07

answered Aug 25, 2019 at 23:54

akrun

891k38 gold badges590 silver badges700 bronze badges

5 Comments

Indrajeet Patil Over a year ago

Thanks; there are two parts to the question though. Your response solves only the first issue.

akrun Over a year ago

@IndrajeetPatil Thanks, I updated with bquote as it seems more direct

Indrajeet Patil Over a year ago

Do you mind also providing a version of the solution that doesn't use bquote and is more in line with the existing code in the question?

akrun Over a year ago

@IndrajeetPatil I would have done that but there is another answer doing that

Indrajeet Patil Over a year ago

It doesn't though. It uses neither list nor paste, which is important for me because I want to save these expressions as a column in a dataframe.

Claus Wilke · Accepted Answer · 2019-12-03 04:40:03Z

2

I'll assume that what you actually care about is that the output looks right, not that plotmath is used. You can use the ggtext package I'm currently developing, which gives you the possibility to use simple markdown/HTML inside of ggplot2. I generally find it much easier to create basic math expressions that way than wrangling with plotmath. And you don't have to work with R expressions at all, the input is always a simple character string.

# this requires the current development versions of ggplot2 and ggtext
# remotes::install_github("tidyverse/ggplot2")
# remotes::install_github("clauswilke/ggtext")

library(ggplot2)
library(ggtext)

ggplot(mtcars, aes(as.factor(cyl), wt)) + 
  geom_boxplot() +
  labs(
    title = "Mean weight:",
    subtitle = "*&mu;* = 3.22, CI<sub>95%</sub>[2.87, 3.57]"
  ) +
  theme(plot.subtitle = element_markdown())

^{Created on 2019-12-02 by the reprex package (v0.3.0)}

answered Dec 3, 2019 at 4:40

Claus Wilke

17.9k8 gold badges61 silver badges111 bronze badges

1 Comment

Indrajeet Patil Over a year ago

Thanks, Claus! I am excited to see that displaying expressions in ggplot will get easier in future using ggtext. But, currently, this solution doesn't work for me. I would like the solution to stick to the format (as list in character type column that can be parsed) I've shown because it's the one I need to implement in a package function: github.com/IndrajeetPatil/ggstatsplot/blob/…

Collectives™ on Stack Overflow

using `plotmath` to display combination of subscript and `[ ]`

4 Answers 4

2 Comments

Comments

5 Comments

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

4 Answers 4

2 Comments

Comments

5 Comments

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related