gh_comment.Rmd

---
output: github_document
params:
  owner: tidyverse
  repo: dplyr
  comment_id: 313734872
---

```{r include=FALSE}
library(gh)

comment <- gh(
  "/repos/{owner}/{repo}/issues/comments/{comment_id}",
  owner = params$owner,
  repo = params$repo,
  comment_id = params$comment_id
)
```

## [Comment](`r comment$html_url`) by [`r comment$user$login`](`r comment$user$html_url`) at `r comment$created_at`

`r comment$body`



<!-- https://git.io/JtoSC -->