## Not run:
# yo <- gs_new("yo")
# yo <- gs_edit_cells(yo, input = head(iris), trim = TRUE)
# gs_read(yo)
#
# yo <- gs_ws_new(yo, ws = "byrow_FALSE")
# yo <- gs_edit_cells(yo, ws = "byrow_FALSE",
# input = LETTERS[1:5], anchor = "A8")
# gs_read_cellfeed(yo, ws = "byrow_FALSE", range = "A8:A12") %>%
# gs_simplify_cellfeed()
#
# yo <- gs_ws_new(yo, ws = "byrow_TRUE")
# yo <- gs_edit_cells(yo, ws = "byrow_TRUE", input = LETTERS[1:5],
# anchor = "A8", byrow = TRUE)
# gs_read_cellfeed(yo, ws = "byrow_TRUE", range = "A8:E8") %>%
# gs_simplify_cellfeed()
#
# yo <- gs_ws_new(yo, ws = "col_names_FALSE")
# yo <- gs_edit_cells(yo, ws = "col_names_FALSE", input = head(iris),
# trim = TRUE, col_names = FALSE)
# gs_read_cellfeed(yo, ws = "col_names_FALSE") %>%
# gs_reshape_cellfeed(col_names = FALSE)
#
# gs_delete(yo)
# ## End(Not run)
Run the code above in your browser using DataCamp Workspace