spectr/README.Rmd

---
output: rmarkdown::github_document
editor_options: 
  chunk_output_type: console
---
```{r pkg-knitr-opts, include=FALSE}
hrbrpkghelpr::global_opts()
```

```{r badges, results='asis', echo=FALSE, cache=FALSE}
hrbrpkghelpr::stinking_badges()
```

```{r description, results='asis', echo=FALSE, cache=FALSE}
hrbrpkghelpr::yank_title_and_description()
```

## What's Inside The Tin

The following functions are implemented:

```{r ingredients, results='asis', echo=FALSE, cache=FALSE}
hrbrpkghelpr::describe_ingredients()
```

## Installation

```{r install-ex, results='asis', echo=FALSE, cache=FALSE}
hrbrpkghelpr::install_block()
```

## Usage

```{r lib-ex}
library(spectr)

# current version
packageVersion("spectr")

```

### Test if Chrome Remote Interface is running

```{r ex1}
cri_active()
```

### Look at all the requests made by visiting RStudio

```{r ex2}
library(dplyr)
library(tidyr)

site <- inspect("http://rstudio.org")

group_by(site, requestId) %>%
  summarise(orig_url = request$url[1], r = extract_url_and_content_type(response)) %>%
  unnest() %>%
  mutate(apex = apex_or_public_suffix(url)) %>% 
  knitr::kable("markdown")
```

### HTML reading

```{r ex3}
cri_read_html("https://rstudio.org", as = "parsed")
```

### Full page screenshot

```{r ex4}
full_page_screenshot("https://www.cervelo.com/media/catalog/product/cache/b7aae6d4f2b2644583da2c4e434b55ef/p/5/p5_da_di2_black_teal_1_.jpg")
```

## spectr Metrics

```{r cloc, echo=FALSE}
cloc::cloc_pkg_md()
```

## Code of Conduct

Please note that this project is released with a Contributor Code of Conduct. 
By participating in this project you agree to abide by its terms.