knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
psInputFile <- system.file("extdata","VCE_results.csv", package = "rvcetools")
# Run function read_vce ResultDF <- rvcetools::read_vce4grafics(psInputFile = psInputFile)
### # Plot heritability rvcetools::plot_h2(psInputFile = ResultDF)
# Plot genetic correlations rvcetools::plot_gencorr(psInputFile = ResultDF)
rvcetools::plot_var(psInputFile = ResultDF)
sessionInfo()
r paste(Sys.time(),paste0("(", Sys.info()[["user"]],")" ))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.