## Not run:
# yo <- gs_new("yo")
# yo <- gs_edit_cells(yo, input = head(iris), trim = TRUE)
# gs_read_csv(yo)
# yo <- gs_ws_resize(yo, ws = "Sheet1", row_extent = 5, col_extent = 4)
# gs_read_csv(yo)
# yo <- gs_ws_resize(yo, ws = 1, row_extent = 3, col_extent = 3)
# gs_read_csv(yo)
# yo <- gs_ws_resize(yo, row_extent = 2, col_extent = 2)
# gs_read_csv(yo)
# gs_delete(yo)
# ## End(Not run)
Run the code above in your browser using DataLab