In f0nzie/petroleum.ml: Machine Learning Applications in Machine Learning

knitr::opts_chunk$set(cache=TRUE, 
                      collapse = TRUE, 
                      comment = "#>")

How many ML papers on water injection and water flooding?

library(petro.One)
# provide two different set of keywords to combine as vectors
major  <- c("water injection", "water flooding")
minor  <- c("machine-learning")
lesser <- c("neural network", "algorithm")

p.df <- join_keywords(major, minor, lesser, get_papers = FALSE)
p.df

# this was failing in machine learning notebook

major <- c("machine learning")
minor <- c("petrophysics", "seismic", "geophysics")
ml_technique <- c("deep learning", "principal component analysis")

by.ml_technique <- join_keywords(major, minor, ml_technique, 
                                 get_papers = TRUE, 
                                 sleep = 3, verbose = FALSE)
by.ml_technique