https://github.com/favstats/goodreadr
Scrape Goodreads website for book quotes and similar books.
https://github.com/favstats/goodreadr
Last synced: 9 months ago
JSON representation
Scrape Goodreads website for book quotes and similar books.
- Host: GitHub
- URL: https://github.com/favstats/goodreadr
- Owner: favstats
- License: other
- Created: 2020-12-14T20:03:26.000Z (over 5 years ago)
- Default Branch: master
- Last Pushed: 2023-03-04T08:23:20.000Z (over 3 years ago)
- Last Synced: 2025-10-04T14:55:14.302Z (9 months ago)
- Language: R
- Homepage:
- Size: 138 KB
- Stars: 7
- Watchers: 1
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.Rmd
- Contributing: .github/CONTRIBUTING.md
- License: LICENSE
- Code of conduct: .github/CODE_OF_CONDUCT.md
- Support: .github/SUPPORT.md
Awesome Lists containing this project
README
---
output: github_document
---
```{r, include = FALSE}
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>",
fig.path = "man/figures/README-",
out.width = "100%"
)
devtools::load_all()
```
# goodreadr
[](https://www.tidyverse.org/lifecycle/#experimental)
[](https://CRAN.R-project.org/package=goodreadr)
The goal of goodreadr is to scrape data from goodreads.
## Installation
You can install the development version of goodreadr from this repository with:
``` r
devtools::install_github("favstats/goodreadr")
```
## Examples
```{r example, eval = F}
library(goodreadr)
## basic example code
```
### Get book stats
```{r}
books_dat <- gr_books("https://www.goodreads.com/book/show/54498122-covid-19")
books_dat
```
### Get quotes from a book
```{r}
quotes_dat <- gr_quotes("https://www.goodreads.com/book/show/54498122-covid-19")
quotes_dat
```
```{r}
quotes_dat$text
```
### Get Similar Books
```{r}
similar_dat <- gr_similar_books("https://www.goodreads.com/book/show/54498122-covid-19")
similar_dat
```
```{r}
similar_dat$book_title
```
### Get Book genres
```{r}
genre_dat <- gr_genres("https://www.goodreads.com/book/show/3.Harry_Potter_and_the_Sorcerer_s_Stone")
genre_dat
```
```{r}
genre_dat$genre
```
### Get Book reviews (only first 20)
```{r}
review_dat <- gr_reviews("https://www.goodreads.com/book/show/54498122-covid-19")
review_dat
```
```{r}
review_dat$review_text
```