R/reshape.R

In basetable: Fast and Memory-Efficient Base R Table Manipulation

Defines functions unstack stack reshape

Documented in reshape stack unstack

reshape <- function(data, ..., direction) {
  bt_as_data_table(stats::reshape(bt_as_data_frame(data), ..., direction = direction))
}

stack <- function(data, select = NULL, drop = FALSE) {
  df <- bt_as_data_frame(data)
  if (is.null(select)) {
    select <- names(df)
  }
  select <- bt_resolve_cols(df, select)
  bt_as_data_table(utils::stack(df[, select, drop = drop]))
}

unstack <- function(data, form, ...) {
  bt_as_data_table(utils::unstack(bt_as_data_frame(data), form = form, ...))
}

Try the basetable package in your browser