Nothing
## ----example1------------------------------------------------------------
library(predatory)
name <- 'International Journal of Electrochemical Science'
temp <- find.predatory(x = name)
temp
## ----example2------------------------------------------------------------
my.issn <- '00208-0836'
temp <- find.predatory(x = my.issn, by = 'issn')
temp
## ----example3------------------------------------------------------------
my.str <- 'finance'
temp <- find.predatory(x = my.str, type.match = 'partial')
head(temp)
## ----example4------------------------------------------------------------
df.predpub <- get.predpubTable()
head(df.predpub)
str(df.predpub)
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.