library(nat)
load("~/projects/Shahar/LHNTracing/data/lhnsxfinal.rda")
cols=intersect(names(lhnsxfinal[,]), colnames(physplitdata::PhySplitDB))
notcols=setdiff(names(lhnsxfinal[,]), cols)
if(!isTRUE(all.equal(physplitdata::PhySplitDB[names(lhnsxfinal), cols],
lhnsxfinal[,cols]))){
message("Updating lhnsxfinal metadata from physplitdata::PhySplitDB")
lhnsxfinal[,cols]=physplitdata::PhySplitDB[names(lhnsxfinal),cols]
}
library(devtools)
use_data(lhnsxfinal, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.