## ----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("Hola desde R")
# #> ¡Hola! ¿En qué puedo ayudarte con R?

## -----------------------------------------------------------------------------
# chat$stream("Dame tres ideas para nombrar un paquete de R.")