aperWrapper
aperWrapper(ob, li = lapply(seq_along(dim(ob)), function(x) 1:5))
ob
the object sent to apercu
li
the limits
the apercu object, of class ap