R cor() heatmap that also takes into account lag?

Question

I have this df:

> head(calcium)
     Cell 1    Cell 2     Cell 3    Cell 4    Cell 5    Cell 6    Cell 7    Cell 8    Cell 9   Cell 10
1 0.4672073 0.584419