Nothing
kPeriod <-
list(P7Days = "7 Days",
P1Month = "1 Month",
P2Months = "2 Months",
P3Months = "3 Months",
P6Months = "6 Months",
P1Year = "1 Year")
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.