Capstone Mini Projects

Scorecard Summary

Count Passing Metrics

A capstone scorecard turns several project metrics into a small pass-count summary.

Program

Play the script to change the target score and watch the summary change.

scorecard_summary.R 
target <- 
metrics <- c(82, 75, 91)
passed <- metrics >= target
pass_count <- sum(passed)
total <- length(metrics)
label <- paste(pass_count, total, sep = "/")
cat(label, "\n", sep = "")

target <- 
metrics <- c(82, 75, 91)
passed <- metrics >= target
pass_count <- sum(passed)
total <- length(metrics)
label <- paste(pass_count, total, sep = "/")
cat(label, "\n", sep = "")

target <- 
metrics <- c(82, 75, 91)
passed <- metrics >= target
pass_count <- sum(passed)
total <- length(metrics)
label <- paste(pass_count, total, sep = "/")
cat(label, "\n", sep = "")
scorecard A scorecard stores several project metrics in one vector.
threshold Changing `target` changes which metrics count as passing.
summary `sum(passed)` counts TRUE values in the logical vector.