Databases
StackOverflow2013
Postsdbo
POadding text to ggplot geom_jitter points that match a condition
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POadding text to ggplot geom_jitter points that match a condition
    primarykey
    data
    text
    <p>How can I add text to points rendered with geom_jittered to label them? geom_text will not work because I don't know the coordinates of the jittered dots. Could you capture the position of the jittered points so I can pass to geom_text?</p> <p>My practical usage would be to plot a boxplot with the geom_jitter over it to show the data distribution and I would like to label the outliers dots or the ones that match certain condition (for example the lower 10% for the values used for color the plots).</p> <p>One solution would be to capture the xy positions of the jittered plots and use it later in another layer, is that possible?</p> <h2>[update]</h2> <p>From Joran answer, a solution would be to calculate the jittered values with the jitter function from the base package, add them to a data frame and use them with geom_point. For filtering he used ddply to have a filter column (a logic vector) and use it for subsetting the data in geom_text.</p> <p>He asked for a minimal dataset. I just modified his example (a unique identifier in the label colum)</p> <pre><code>dat &lt;- data.frame(x=rep(letters[1:3],times=100),y=runif(300), lab=paste('id_',1:300,sep='')) </code></pre> <p>This is the result of joran example with my data and lowering the display of ids to the lowest 1% <img src="https://i.stack.imgur.com/jv3b0.png" alt="boxplot with jitter dots and label in lower 1% values"></p> <p>And this is a modification of the code to have colors by another variable and displaying some values of this variable (the lowest 1% for each group):</p> <pre><code>library("ggplot2") #Create some example data dat &lt;- data.frame(x=rep(letters[1:3],times=100),y=runif(300), lab=paste('id_',1:300,sep=''),quality= rnorm(300)) #Create a copy of the data and a jittered version of the x variable datJit &lt;- dat datJit$xj &lt;- jitter(as.numeric(factor(dat$x))) #Create an indicator variable that picks out those # obs that are in lowest 1% by x datJit &lt;- ddply(datJit,.(x),.fun=function(g){ g$grp &lt;- g$y &lt;= quantile(g$y,0.01); g$top_q &lt;- g$qual &lt;= quantile(g$qual,0.01); g}) #Create a boxplot, overlay the jittered points and # label the bottom 1% points ggplot(dat,aes(x=x,y=y)) + geom_boxplot() + geom_point(data=datJit,aes(x=xj,colour=quality)) + geom_text(data=subset(datJit,grp),aes(x=xj,label=lab)) + geom_text(data=subset(datJit,top_q),aes(x=xj,label=sprintf("%0.2f",quality))) </code></pre> <p><img src="https://i.stack.imgur.com/aOOac.png" alt="boxplot with jitter dots and label in lower 1% values"></p>
    singulars
    1. PO
      singulars
      1. PTAnswer
    1. This table or related slice is empty.
    1. PTQuestion
    1. USM. Tibbits
    1. USPablo Marin-Garcia
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PO
      singulars
      1. PTAnswer
    1. VO
      singulars
      1. POadding text to ggplot geom_jitter points that match a condition
      1. This table or related slice is empty.
      1. VTUpMod
    2. VO
      singulars
      1. POadding text to ggplot geom_jitter points that match a condition
      1. USPablo Marin-Garcia
      1. VTFavorite
    3. VO
      singulars
      1. POadding text to ggplot geom_jitter points that match a condition
      1. USgabe
      1. VTFavorite
    1. This table or related slice is empty.
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload