Collect<-function(X){
require(rvest)
require(dplyr)
list(
CAL = CalData(X),
LVL = get_lvls(X),
PH_COEF=pH_coefs(X),
Inst = getInst(X),
sn = getSn(X),
Lot = getLot(X),
assay=determineAssay(X),
file=getFile(X)
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.