axis - How to set limits for axes in ggplot2 R plots?
ticks text (3)
Basically you have two options
scale_x_continuous(limits = c(-5000, 5000))
coord_cartesian(xlim = c(-5000, 5000))
Where the first removes all data points outside the given range and the second only adjusts the visible area. In most cases you would not see the difference, but if you fit anything to the data it would probably change the fitted values.
You can also use the shorthand function
ylim), which like the first option removes data points outside of the given range:
+ xlim(-5000, 5000)
For more information check the description of
The RStudio cheatsheet for
ggplot2 makes this quite clear visually. Here is a small section of that cheatsheet:
Distributed under CC BY.
I plot the following:
library(ggplot2) carrots <- data.frame(length = rnorm(500000, 10000, 10000)) cukes <- data.frame(length = rnorm(50000, 10000, 20000)) carrots$veg <- 'carrot' cukes$veg <- 'cuke' vegLengths <- rbind(carrots, cukes) ggplot(vegLengths, aes(length, fill = veg)) + geom_density(alpha = 0.2)
Now say I only want to plot the region between
5000, instead of the entire range.
How can I do that?
Quick note: if you're also using
coord_flip() to flip the x and the y axis, you won't be able to set range limits using
coord_cartesian() because those two functions are exclusive (see here).
Fortunately, this is an easy fix; set your limits within
coord_flip() like so:
p + coord_flip(ylim = c(3,5), xlim = c(100, 400))
This just alters the visible range (i.e. doesn't remove data points).
Here is my take on the lines with
ggplot2 using some of the code from above:
ggplot()+geom_line(aes(x=seq(0,1,length.out=1000),y=sin(x)),position=position_jitter(width=0.02),lwd=1.5,col="white")+ geom_line(aes(x=seq(0,1,length.out=1000),y=sin(x)),position=position_jitter(width=0.004),lwd=1.4,col="red")+ geom_line(aes(x=seq(0,1,length.out=1000),y=cos(x)),position=position_jitter(width=0.02),lwd=1.5,col="white")+ geom_line(aes(x=seq(0,1,length.out=1000),y=cos(x)),position=position_jitter(width=0.004),lwd=1.4,col="blue")+ theme_bw()+theme(panel.grid.major=element_blank(),panel.grid.minor=element_blank())
Not sure how to replace the axes, but could use the same approach with
jitter. Then it's a matter of importing the font from XKCD and layering with