if(FALSE){# Get the course grades for courseid 52course_grades<-mdl_grades()%>%filter(courseid==52, item_type=="course")%>%collect()# Get the other grades items:grades_items_grades<-mdl_grades()%>%filter(courseid==52, item_type!="course")%>%collect()}