library(htmltools)
div( class = "row", div( class = "col-md-4", img( src = "logo.png", class = "img-responsive responsive-img" ) ), div( class = "col-md-8", "R wrapper to the", a( "webhose.io", href = "https://webhose.io/", target = "_blank" ), "API." ) ) br()
devtools::install_github("news-r/webhoser")
wh_token
.wh_token("xXX-x0X0xX0X-00X") # setup token # webhoser object wh_news(q = '"R programming language" is_first:true language:english site_type:news') -> news # basic # collect results wh_news(q = '"R programming language"') %>% # get news wh_collect() -> basic # flatten results wh_news(q = '"R programming language" OR rstats') %>% # get news wh_collect(TRUE) -> flat # flatten results # get three pages on the rstats # format dates wh_news(q = '"R programming language" OR rstats') %>% wh_paginate(3) %>% wh_collect() %>% dplyr::mutate(published = wh_date(published)) -> rstats
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.