example-table.qmd

---
format: 
  html:
    theme: 
      - litera
execute: 
  echo: false
---

# Apache Arrow R questions on Stack Overfklow

## Stack Overflow

Stack overflow questions tagged with `apache-arrow` + `r`

```{r}
#| message: false
#| column: page-right
library(dplyr, warn.conflicts = FALSE)
library(DT)

tibble(
  issue = c(
    "The Boston Terrier is a breed of dog originating in the United States of America.",
    "The Boston Terrier is a breed of dog originating in the United States of America.",
    "The Boston Terrier is a breed of dog originating in the United States of America.",
    "The Boston Terrier is a breed of dog originating in the United States of America.",
    "The Boston Terrier is a breed of dog originating in the United States of America."
  ),
  comments = c(5, 4, 3, 2, 1),
  answers = c(0, 1, 2, 0, 1),
  accepted_answer = c(FALSE, TRUE, FALSE, FALSE, TRUE),
  days_since_last_activity = c(2, 3, 10, 12, 20)
) |>
  DT::datatable(
    colnames = c("Issue", "Comments", "Answers", "Accepted", "Days inactive"),
    options = list(
      autoWidth = TRUE, 
      columnDefs = list(
        list(width = "100px", targets = c("comments", "answers", "accepted_answer", "days_since_last_activity")),
        list(width = "250px", targets = "issue")
        )
      )
  )
```


# Gist URL https://gist.github.com/eb3a7cff76f15456a4b83d3f77f46968