Matt's ChatGPT Exercise

# Using the lab notebook post: <https://mattgeorgephd.github.io/gptstudio-guide/>

# My API key: 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

```{r}
# rm(list=ls())

 ## Load Packages
load.lib<-c("gptstudio","tidyverse") # List of required packages
install.lib <- load.lib[!load.lib %in% installed.packages()] # Select missing packages
for(lib in install.lib) install.packages(lib,dependencies=TRUE) # Install missing packages + dependencies
sapply(load.lib,require,character=TRUE) # Load all packages.

```

```{r}
require(usethis)
edit_r_environ(scope="project")

```