multiple columns in a sliding window, runner package, xts format

I’m trying to do something similar to w1, which contains colums in a sliding window of size k