source('./R/url.R') source('./R/summary.R') my_url <- make_search_url(query = "neural network", how = "all") result <- read_html(my_url) raw_right <- publication_result_right(result) raw_left <- publication_result_left(result) summary_by_doctype(raw_right) summary_by_publisher(raw_right) summary_by_dates(raw_left) summary_by_publications(raw_left)
source('./R/url.R') source('./R/summary.R') my_url <- make_search_url(query = "shale oil", how = "all") result <- read_html(my_url) pubs_raw <- publication_result_right(result) summary_by_doctype(pubs_raw) summary_by_publisher(pubs_raw)
raw_left <- publication_result_left(result) summary_by_dates(raw_left) summary_by_publications(raw_left)
source('./R/url.R') source('./R/summary.R') my_url <- make_search_url(query = "shale gas", how = "all") result <- send_url(my_url) pubs_raw <- publication_result(result) summary_by_doctype(pubs_raw)
source('./R/url.R') source('./R/summary.R') my_url <- make_search_url(query = "shale gas", how = "all") result <- send_url(my_url) pubs_raw <- publication_result(result) summary_by_publisher(pubs_raw)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.