## Not run:
# foo <- gs_new()
# foo
# gs_delete(foo)
#
# foo <- gs_new("foo", ws_title = "numero uno", 4, 15)
# foo
# gs_delete(foo)
#
# foo <- gs_new("foo", ws = "I know my ABCs", input = letters, trim = TRUE)
# foo
# gs_delete(foo)
# ## End(Not run)
Run the code above in your browser using DataLab