x[["a"]][[1]] is equivalent to zip_n(x)[[1]][["a"]], in the same way z[a,b] is equivalent to t(z)[b, a]. That suggests there might be interesting generalisations of zip_n() that correspond to aperm...