This function cleans water quality data by addressing common issues.
Examples
if (FALSE) { # \dontrun{
# Load calibration data from an Excel file
temp_path <- system.file("extdata", "calibration_data.xlsx", package = "SWATprepR")
cal_data <- load_template(temp_path)
# Clean water quality data
cal_data$data <- clean_wq(cal_data$data)
} # }
