---
title: "Using childeswordfreq"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{Using childeswordfreq}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```r
# Only run if the package is installed
if (requireNamespace("childeswordfreq", quietly = TRUE)) {
  childeswordfreq::word_counts(...)
}

word_file <- system.file("extdata", "word_list.csv", package = "childeswordfreq")
output_file <- tempfile(fileext = ".xlsx")

word_counts(
  word_list_file = word_file,
  output_file = output_file,
  collection = NULL,
  language = "eng",
  age = c(24, 36),
  sex = c("female", "male")
)

```