R/ungroupRowwise.R

In TESA-workshops/TESAsamSim: Closed-loop salmon simulator for 2021 TESA workshop

#' ungroupRowwiseDF
#'
#' Simple helper function to undo rowwise grouping.
#'
#' @param x Dataframe that is grouped rowwise.
#' @return Returns a dataframe that is no longer grouped rowwise.
#'
#' @export
ungroupRowwiseDF <- function(x) {
  class(x) <- c( "tbl_df", "data.frame")
  x
}