collective/coldcallbot
17
0
Fork 0
Code

updated code to better figure out whose not registered

Browse Source
This commit is contained in:
Benjamin Mako Hill 2024-09-28 20:10:18 -07:00
parent 56fb61e8b0
commit 360a7e8ee0
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
assessment_and_tracking/track_enrolled.R
View File

@ -1,5 +1,5 @@
myuw <- read.csv("../data/2022_winter_COM_481_A_students.csv") myuw <- read.csv("data/2024_autumn_COM_481_A_students.csv")
gs <- read.delim("../data/student_information.tsv") gs <- read.delim("data/student_information.tsv")
## these are students who dropped the class (should be empty) ## these are students who dropped the class (should be empty)
gs[!gs$Your.UW.student.number %in% myuw$StudentNo,] gs[!gs$Your.UW.student.number %in% myuw$StudentNo,]
@ -7,6 +7,12 @@ gs[!gs$Your.UW.student.number %in% myuw$StudentNo,]
## these are students who are in the class but didn't reply to the form ## these are students who are in the class but didn't reply to the form
myuw[!myuw$StudentNo %in% gs$Your.UW.student.number,] myuw[!myuw$StudentNo %in% gs$Your.UW.student.number,]
roster.merged <- merge(myuw, gs, by.x="StudentNo", by.y="Your.UW.student.number", all.x=TRUE, all.y=FALSE)
roster.merged[,c("StudentNo", "Email", "FirstName", "LastName", "Your.username.on.the.class.Discord.server", "checked.off.on.discord")][!roster.merged$StudentNo %in% gs$Your.UW.student.number,]
## these are students who are in the class but didn't reply to the form
## read all the folks who have been called and see who is missing from ## read all the folks who have been called and see who is missing from
## the google sheet ## the google sheet