R/add_id.R

Defines functions add_id

add_id <- function(input, data) {
  if (input$id == TRUE) {
    ID <- 1:nrow(data)
    data <- data.frame(ID, data)
  }
  data
}
MeikeSteinhilber/spirit documentation built on Dec. 17, 2021, 3:22 a.m.