collective/coldcallbot
17
0
Fork 0
Code

report on the number of questions answered, not just asked

Browse Source
This commit is contained in:
Benjamin Mako Hill 2021-05-04 12:49:03 -07:00
parent 95a9977572
commit da8f47aa27
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
assessment_and_tracking/track_participation.R
View File

@ -11,7 +11,9 @@ call.list <- do.call("rbind", lapply(list.files(".", pattern="^call_list-.*tsv$"
colnames(call.list) <- gsub("_", ".", colnames(call.list)) colnames(call.list) <- gsub("_", ".", colnames(call.list))
table(call.list$unique_name) table(call.list$unique_name[call.list$answered])
exit()
call.list$day <- as.Date(call.list$timestamp) call.list$day <- as.Date(call.list$timestamp)