inst/doc/predatory-vignette.R

In predatory: Tools for Detecting Predatory Publishers and Journals

## ----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)