R/data_reduction.R

Defines functions data_reduction

data_reduction <- function(input, data) {
  if (input$N_reduction == TRUE) {
    data <- data[1:input$N, ]
  }
  data
}
MeikeSteinhilber/spirit documentation built on Dec. 17, 2021, 3:22 a.m.