Code
pbcs <- catPbc(datRaw, datRec, idRaw = "ID", idRec = "ID", context.vars = "hisei",
values = inputList$values, subunits = inputList$subunits)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.