# NOT RUN {
ss <- gs_gap() %>% gs_copy(to = "jekyll")
gs_ls("jekyll") ## see? it's there
ss <- ss %>% gs_rename("hyde")
gs_ls("hyde") ## see? it's got a new name
gs_delete(ss)
# }
Run the code above in your browser using DataLab