#' list2array
#' converts a list into an array
#' @param mylist a list
#' @return a kx3xn array with landmark coordinates
#' @author Antonio Profico, Alessio Veneziano, Marina Melchionna, Paolo Piras, Pasquale Raia
#' @export
list2array<-function(mylist){
final<-NULL
for(i in 1:length(mylist)){
temp<-array(mylist[[i]],dim=c(nrow(mylist[[i]]),ncol(mylist[[i]]),1))
final<-abind::abind(final,temp)
}
return(final)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.