## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----eval=FALSE, include=TRUE-------------------------------------------------
# # install.packages("remotes")
# remotes::install_github("posocap/substackR")

## ----eval=FALSE, include=TRUE-------------------------------------------------
# library(substackR)
# set_substack_key("YOUR_API_KEY")

## ----eval=FALSE, include=TRUE-------------------------------------------------
# latest_posts <- get_substack_latest("posocap.substack.com", limit = 5)
# print(latest_posts)

## ----eval=FALSE, include=TRUE-------------------------------------------------
# top_posts <- get_substack_top("posocap.substack.com", limit = 5)
# print(top_posts)

## ----eval=FALSE, include=TRUE-------------------------------------------------
# search_results <- get_substack_search("posocap.substack.com", query = "economics", limit = 5)
# print(search_results)

## ----eval=FALSE, include=TRUE-------------------------------------------------
# single_post <- get_substack_post("posocap.substack.com", slug = "your-post-slug")
# print(single_post)