17
0

don't count missing questions as asked

This commit is contained in:
Benjamin Mako Hill 2020-11-10 10:26:23 -08:00
parent 4676d0b0c3
commit 3955a6bfcc

View File

@ -9,6 +9,10 @@ colnames(call.list) <- gsub("_", ".", colnames(call.list))
call.list$day <- as.Date(call.list$timestamp) 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)) call.counts <- data.frame(table(call.list$discord.name))
colnames(call.counts) <- c("discord.name", "num.calls") colnames(call.counts) <- c("discord.name", "num.calls")