geom-text

I have read many postings on this topic using expression() , paste() , and bquote() , or some combination. I think I am close to solving my problem, but I just can't get there. The following script generates a plot labelled with "y = 1 + 2(x); r^2= 0.9". How can I italicize "y" and "x", and italicize the "r" and superscript the 2 of "r^2"? If I have overlooked a relevant earlier post, sorry, but please direct me to it. df <- data.frame(x=c(1:5), y=c(1:5)) a <- 1 b <- 2 r2 <- 0.9 eq <- paste("y = ", a, " + ", b, "(x); r^2=", r2) ggplot(data=df, aes(x=x, y=y))+ geom_point(color="black")+ geom

I'm plotting a stacked bar graph and use geom_text to insert the value of each stack. The difficulty I'm facing is that some stacks are very small/narrow, so that the text of two stacks overlap each other and hence is not very readable. I would like to adjust the text positioning in a way that for example the text position alternates between hjust == 1 and hjust == -1 for each stack, so that there will be no overlaps (or any other method that will result in readable text). Here's an example of what I'm currently doing (a dput of mydf is provided below): library(ggplot2) ggplot(mydf, aes(x

This is actually two questions in one (not sure if goes against SO rules, but anyway). First question is how can I force a geom_text to fit within a geom_bar ? (dynamically according to the values plotted) Looking around, the solutions I found were changing the size of the label. That certainly works, but not for every case. You can change the size for a specific plot to make the text fit within the bar, but when the data changes, you may need to manually change the size of the text again. My real-life problem is that I need to generate the same plot for constantly changing data (daily), so I

Similarly to this question , I want to change the default "a" in the legend, but rather than removing it completely, I want to replace it with the labels themselves. That is, the first line of the legend should have a colored icon labeled "se" with the full name "setosa" on the right. iris$abbrev = substr( iris$Species, 1, 2 ) ggplot(data = iris, aes(x = Sepal.Length, y=Sepal.Width, shape = Species, colour = Species)) + geom_text(aes(label = abbrev)) You can change the legend key generating function. This still requires a bit of manual intervention, but arguably less than using the grobs.

I've created a side-by-side boxplot using ggplot2. p <- ggplot(mtcars, aes(x=factor(cyl), y=mpg)) p + geom_boxplot(aes(fill=factor(cyl))) I want to annotate with min, max, 1st quartile, median and 3rd quartile in the plot. I know geom_text() can do so and may be fivenum() is useful. But I cannot figure out how exactly I can do!. These values should be displayed in my plot. The most succinct way I can think of is to use stat_summary . I've also mapped the labels to a color aesthetic, but you can, of course, set the labels to a single color if you wish: ggplot(mtcars, aes(x=factor(cyl), y=mpg,

I'm looking for a way to label a stacked bar chart with percentages while the y-axis shows the original count (using ggplot). Here is a MWE for the plot without labels: library(ggplot2) df <- as.data.frame(matrix(nrow = 7, ncol= 3, data = c("ID1", "ID2", "ID3", "ID4", "ID5", "ID6", "ID7", "north", "north", "north", "north", "south", "south", "south", "A", "B", "B", "C", "A", "A", "C"), byrow = FALSE)) colnames(df) <- c("ID", "region", "species") p <- ggplot(df, aes(x = region, fill = species)) p + geom_bar() I have a much larger table and R counts quite nicely the different species for every