# Removing NA Rows ####
NARows <-function(df, vars){
apply(as.data.frame(df[,vars]), 1, function(a){
any(is.na(a)|a=="Inf"|a=="-Inf")
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.