Reporting Workflows
Summary Table
Rounded Metrics
Reports often turn computed values into small tables with stable labels and rounded display values.
Program
Play the script to change the number of shown digits and watch the table labels update.
summary_table.R
metric <- c("accuracy", "recall", "precision")
value <- c(0.9234, 0.8751, 0.9012)
digits <-
shown <- round(value, digits)
rows <- paste(metric, shown, sep = "=")
label <- paste(rows, collapse = ";")
cat(label, "\n", sep = "")
metric <- c("accuracy", "recall", "precision")
value <- c(0.9234, 0.8751, 0.9012)
digits <-
shown <- round(value, digits)
rows <- paste(metric, shown, sep = "=")
label <- paste(rows, collapse = ";")
cat(label, "\n", sep = "")
metric <- c("accuracy", "recall", "precision")
value <- c(0.9234, 0.8751, 0.9012)
digits <-
shown <- round(value, digits)
rows <- paste(metric, shown, sep = "=")
label <- paste(rows, collapse = ";")
cat(label, "\n", sep = "")
round
`round(value, digits)` prepares numeric values for display.
row label
`paste(metric, shown, sep = "=")` builds compact table rows.
collapse
`paste(rows, collapse = ";")` turns rows into a report-ready line.