From 3955a6bfcc0bd424fcf069f05d866c75315ee16c Mon Sep 17 00:00:00 2001 From: Benjamin Mako Hill Date: Tue, 10 Nov 2020 10:26:23 -0800 Subject: [PATCH 1/1] don't count missing questions as asked --- data/track_participation.R | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/data/track_participation.R b/data/track_participation.R index f616d21..8bce2e5 100644 --- a/data/track_participation.R +++ b/data/track_participation.R @@ -9,6 +9,10 @@ colnames(call.list) <- gsub("_", ".", colnames(call.list)) call.list$day <- as.Date(call.list$timestamp) +## drop calls where the person wasn't present +call.list[!call.list$answered,] +call.list <- call.list[call.list$answered,] + call.counts <- data.frame(table(call.list$discord.name)) colnames(call.counts) <- c("discord.name", "num.calls") -- 2.39.5