## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>", eval = FALSE)

## ----eval = TRUE--------------------------------------------------------------
library(ellmercodex)

codex_available()

## -----------------------------------------------------------------------------
# codex_login()

## -----------------------------------------------------------------------------
# chat <- chat_codex(model = "gpt-6-luna", effort = "low")
# chat$chat("Hello from R")
# #> Hello! What are you working on in R?

## -----------------------------------------------------------------------------
# chat$stream("Give me three ideas for naming an R package.")