Using googlesheets4 interactively

gistfile1.txt

# https://drive.google.com/drive/folders/1vSdFzlbdT4khWeileTmN8gycNCINT2gS?usp=share_link

suppressPackageStartupMessages({
  library(googlesheets4)
  library(dplyr)
})

# authorize
gs4_auth()

# the sandbox
uri = "https://docs.google.com/spreadsheets/d/1wu6gy2EMMKbN5vZYnmpoxrj3Rs52ubZvzr5lm9k8frQ/edit?gid=75930542#gid=75930542"

# the ss object
ss = gs4_get(uri)
ss

# read a sheet - faster if you tell it what to expect
x = read_sheet(ss, col_types = "nnnnc")
glimpse(x)

# add a blank sheet
ss = sheet_add(ss, sheet = "Ben")
# put some data there
ss = range_write(ss, faithful, sheet = "Ben")
# read it back
y = read_sheet(ss, col_types = "nn", sheet = "Ben")
glimpse(y)

# rename the sheet
ss = sheet_rename(ss, sheet = "Ben", "btupper")

gs4_deauth()

Update the URI