## ----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) # # # Prompts you to log in via OAuth the first time; tokens are then cached # client <- chat_posit() ## ----------------------------------------------------------------------------- # usethis::edit_r_environ()