Nothing
## ---- eval=FALSE---------------------------------------------------------
# library(baseballDBR)
#
# # Grab the Pitching table from the Baseabll Databank
# get_bbdb(table = "Pitching")
#
# Pitching$FIP <- FIP(Pitching, Fangraphs=FALSE, NA_to_zero=FALSE, Sep.Leagues=FALSE)
#
#
## ---- eval=FALSE---------------------------------------------------------
# library(baseballDBR)
#
# fip_valz <- fip_values(Pitching, Fangraphs = FALSE, Sep.Leagues = FALSE)
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.