ggplot2 plotting mathematical expressions

Question

I have the following dataframe:

colframe <- data.frame(x=rep(1,5), y=seq(1,2,.25))

and the vectors

texti <- c("R %in% [0,0.01)", "R %in% [0.01,0.05)", "R %in% [0.05,0.1)", "R %in% [0.1,0.15)", "R > 0.15")
l <- colorRampPalette(c("red","yellow","green"))
hexi <- l(5)

and I want to plot with

ggplot(colframe, aes(x=x, y=y)) +
  geom_point(color=hexi[5:1], size=7) +
  geom_label(aes(label=texti, group=texti), x=1.05, hjust=0) + 
  theme(legend.position = "none",
        panel.background = element_blank(),
        axis.text  = element_blank(),
        axis.ticks = element_blank()) +
  xlab("") + ylab("")

Obviously, $in$ should be represented by an 'element in' symbol and the brackets should also be displayed accordingly. I tried a lot with expressions() but I could not get the correct representation.

Any ideas how I could plot this nicely?

wici · Accepted Answer · 2017-06-02 07:50:25Z

2

Set parse=TRUE inside geom_label() to get expressions as described in ?plotmath. This means you have to rewrite your intervalls. I illustrate how it works with with the same text for all labels:

texti <- rep("R %in% group('[',list(0,0.01),')')",5)

ggplot(colframe, aes(x=x, y=y)) +
  geom_point(color=hexi[5:1], size=7) +
  geom_label(aes(label=texti, group=texti), x=1.05, hjust=0, parse = TRUE) + 
  theme(legend.position = "none", 
        panel.background = element_blank(),
        axis.text  = element_blank(),
        axis.ticks = element_blank()) +
  xlab("") + ylab("")

answered Jun 2, 2017 at 7:50

wici

1,7311 gold badge14 silver badges21 bronze badges

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

Collectives™ on Stack Overflow

ggplot2 plotting mathematical expressions

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related