## ----include = FALSE---------------------------------------------------------- knitr::opts_chunk$set( collapse = TRUE, comment = "#>", eval = FALSE ) ## ----------------------------------------------------------------------------- # library(querychat) # library(palmerpenguins) # library(ellmer) ## ----------------------------------------------------------------------------- # qc <- querychat(penguins, client = "anthropic/claude-sonnet-4-5") # qc$app() # Launch the app ## ----------------------------------------------------------------------------- # # In your .Rprofile # options(querychat.client = "anthropic/claude-sonnet-4-5") ## ----------------------------------------------------------------------------- # client <- chat_anthropic(model = "claude-sonnet-4-5") # qc <- querychat(penguins, client = client) # qc$app() # Launch the app ## ----------------------------------------------------------------------------- # library(ellmer) # # # Just works if GITHUB_TOKEN is set in your environment # client <- chat_github(model = "gpt-4.1") ## ----------------------------------------------------------------------------- # usethis::edit_r_environ()