Apply function to each element of a list, then combine the result as an image by appending along specified axis
This is just a shortcut for purrr::map followed by imappend
liply(lst, fun, axis, ...)
lst |
a list |
fun |
function to apply |
axis |
which axis to append along (e.g. "c" for colour) |
... |
further arguments to be passed to fun |
build.im <- function(size) as.cimg(function(x,y) (x+y)/size,size,size) liply(c(10,50,100),build.im,"y") %>% plot
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.