```r
# change the origin
origin(elev_4) = c(0.25, 0.25)
plot(elev_4)
# and add the original raster
plot(elev, add = TRUE)
```

<div class="figure" style="text-align: center">
<img src="figures/origin-example-1.png" alt="Rasters with identical values but different origins." width="576" />
<p class="caption">(\#fig:origin-example)Rasters with identical values but different origins.</p>
</div>