gap_ss <- gs_gap() # register the Gapminder example sheet
first_4_rows <-
gs_read_cellfeed(gap_ss, "Asia", range = cell_limits(c(NA, 4)))
first_4_rows
gs_reshape_cellfeed(first_4_rows)
gs_reshape_cellfeed(gs_read_cellfeed(gap_ss, "Asia",
range = cell_limits(c(NA, 4), c(3, NA))))
Run the code above in your browser using DataLab