Nothing
utils::globalVariables(c("Nh","data", "nh", "samp", "NhN", "aipmi2", "fpc", "lower", "m2", "me", "midpoint", "midpointnh", "midpointstr", "midstr", "nminus1", "nnminus1m2", "oneminusf", "p", "pNh", "pwt", "received", "se", "second", "sumsvar", "svar", "third", "upper", "value", "variable", "variance", "varstr", "x2", "%>%"))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.