# 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))
```

or

```
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 `xlim`

(or `ylim`

), which like the first option removes data points outside of the given range:

```
+ xlim(-5000, 5000)
```

For more information check the description of ** coord_cartesian**.

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 `x=-5000`

to `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 `geom_text`

.