# NOT RUN {
data(cells)
X <- shift(cells, c(2,3))
# }
# NOT RUN {
plot(X)
# no discernible difference except coordinates are different
# }
# NOT RUN {
plot(cells, pch=16)
plot(shift(cells, c(0.03,0.03)), add=TRUE)
shift(cells, origin="mid")
# }
Run the code above in your browser using DataLab