library("matconv")
flist <- list.files('GeTallele/toolbox', '*.m$')
newflist <- paste0('R/', gsub('.m', '.r', flist, fixed=TRUE))
sapply(flist, function(x){
mat2r(inMat=paste0('GeTallele/toolbox/', x), pathOutR = paste0('R/', gsub('.m', '.r', x, fixed=TRUE)))
})
# note: this package resulted in a pretty awful translation! :(
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.