Using rollapply to compute a week on week percentage change

Question

I have some data which looks like:

   date         col1   col2   col3
              
 1 2020_09_01 53542. 22133. 2