An incident remediation report can count visible tickets at a selected threshold and assign the queue to a fixed owner label.

Program

Play the script to choose minimum severity and inspect the owner report.

incident_owner_report.R
min_severity <- 
severities <- c(1, 2, 3, 3)
visible_count <- sum(severities >= min_severity)
owner <- if (visible_count >= 3) "ops" else "lead"
line <- paste0('min=', min_severity, ' visible=', visible_count, ' ', owner)
cat(line, "\n", sep = "")
min_severity <- 
severities <- c(1, 2, 3, 3)
visible_count <- sum(severities >= min_severity)
owner <- if (visible_count >= 3) "ops" else "lead"
line <- paste0('min=', min_severity, ' visible=', visible_count, ' ', owner)
cat(line, "\n", sep = "")
min_severity <- 
severities <- c(1, 2, 3, 3)
visible_count <- sum(severities >= min_severity)
owner <- if (visible_count >= 3) "ops" else "lead"
line <- paste0('min=', min_severity, ' visible=', visible_count, ' ', owner)
cat(line, "\n", sep = "")
visible count `sum(severities >= min_severity)` counts incidents at or above the selected threshold.
owner label The owner is derived from visible workload, not from host or package state.
remediation row The final output keeps threshold, count, and owner in one report line.