run.beagle5=function(beaglejar, vcfpath, reffile, outpath, plinkfile) {
cmd <- paste0("java -Xmx15g -jar ", beaglejar,
" gt=", vcfpath, " ref=", reffile, " out=", outpath,
" map=", plinkfile, " nthreads=1 window=40 overlap=4 impute=false")
system(cmd, wait = T)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.