# Document functions and dependencies
attachment::att_to_description()
# Check the package
devtools::check()
# Install the package
devtools::install()
# Add functions and tests
usethis::use_r("get_news")
usethis::use_r("get_headlines")
usethis::use_test("get_news")
usethis::use_test("get_headlines")
attachment::att_to_description()
devtools::release()
usethis::use_github_release()
# Prepare raw data for rda.
library(tidyverse)
rss_table_raw <- readr::read_delim("inst/external-data/package_rss.csv",
"|", escape_double = FALSE, trim_ws = TRUE)
glimpse(rss_table_raw)
# # one url has non ascii characters so make sure we use escaped
#
# nonUTF <- iconv(rss_table_raw$rss_url, from="UTF-8", to="ASCII")
#
# index<-is.na(nonUTF)
#
# rss_table_raw$rss_url[index]
#
# hakolhayehudi <- "https://www.hakolhayehudi.co.il/rss/%D7%AA%D7%A8%D7%95%D7%9D_%D7%9C%D7%A0%D7%95"
#
#
# rss_table <- rss_table_raw
# mutate(rss_url = if_else(str_detect(rss_url,
# "hakolhayehudi"), hakolhayehudi, rss_url))
package_rss <- rss_table_raw
usethis::use_data(package_rss, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.