#' Given a list, dataframes or matrices it gives the dimensions of each one of them
#' This is a support function for the thin_wrap_p function
#' @ inlist = input list
#'
elementcalc<-function(inlist){
result<-NULL
for (b in 1:length(inlist)){
df<-data.frame(veclen=dim(inlist[[b]])[1],elem=b)
result<-rbind(df,result)
}
return(result)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.