R/schema_RowData.R

Defines functions as_RowData

# creates an array of instances of RowData
as_RowData <- function(df, col_names = TRUE) {
  df_cells <- purrr::modify(df, as_CellData)
  df_rows <- pmap(df_cells, list)
  if (col_names) {
    df_rows <- c(list(as_CellData(names(df))), df_rows)
  }
  map(df_rows, ~ list(values = unname(.x)))
}

Try the googlesheets4 package in your browser

Any scripts or data that you put into this service are public.

googlesheets4 documentation built on July 22, 2021, 1:07 a.m.