Walkthrough 01 - Processed dataset (for modeling with multi-level models) from students on their motivation and achievement in online science classes
sci_mo_processedDataset of class tibble.
John Ranellucci and Joshua Rosenberg
str(dataedu::sci_mo_processed)
#> spc_tbl_ [603 × 30] (S3: spec_tbl_df/tbl_df/tbl/data.frame)
#> $ student_id : num [1:603] 43146 44638 47448 47979 48797 ...
#> $ course_id : chr [1:603] "FrScA-S216-02" "OcnA-S116-01" "FrScA-S216-01" "OcnA-S216-01" ...
#> $ total_points_possible: num [1:603] 3280 3531 2870 4562 2207 ...
#> $ total_points_earned : num [1:603] 2220 2672 1897 3090 1910 ...
#> $ percentage_earned : num [1:603] 0.677 0.757 0.661 0.677 0.865 ...
#> $ subject : chr [1:603] "FrScA" "OcnA" "FrScA" "OcnA" ...
#> $ semester : chr [1:603] "S216" "S116" "S216" "S216" ...
#> $ section : chr [1:603] "02" "01" "01" "01" ...
#> $ Gradebook_Item : chr [1:603] "POINTS EARNED & TOTAL COURSE POINTS" "ATTEMPTED" "POINTS EARNED & TOTAL COURSE POINTS" "POINTS EARNED & TOTAL COURSE POINTS" ...
#> $ Grade_Category : logi [1:603] NA NA NA NA NA NA ...
#> $ FinalGradeCEMS : num [1:603] 93.5 81.7 88.5 81.9 84 ...
#> $ Points_Possible : num [1:603] 5 10 10 5 438 5 10 10 443 5 ...
#> $ Points_Earned : num [1:603] NA 10 NA 4 399 NA NA 10 425 2.5 ...
#> $ Gender : chr [1:603] "M" "F" "M" "M" ...
#> $ q1 : num [1:603] 5 4 5 5 4 NA 5 3 4 NA ...
#> $ q2 : num [1:603] 4 4 4 5 3 NA 5 3 3 NA ...
#> $ q3 : num [1:603] 4 3 4 3 3 NA 3 3 3 NA ...
#> $ q4 : num [1:603] 5 4 5 5 4 NA 5 3 4 NA ...
#> $ q5 : num [1:603] 5 4 5 5 4 NA 5 3 4 NA ...
#> $ q6 : num [1:603] 5 4 4 5 4 NA 5 4 3 NA ...
#> $ q7 : num [1:603] 5 4 4 4 4 NA 4 3 3 NA ...
#> $ q8 : num [1:603] 5 5 5 5 4 NA 5 3 4 NA ...
#> $ q9 : num [1:603] 4 4 3 5 NA NA 5 3 2 NA ...
#> $ q10 : num [1:603] 5 4 5 5 3 NA 5 3 5 NA ...
#> $ TimeSpent : num [1:603] 1555 1383 860 1599 1482 ...
#> $ TimeSpent_hours : num [1:603] 25.9 23 14.3 26.6 24.7 ...
#> $ TimeSpent_std : num [1:603] -0.181 -0.308 -0.693 -0.148 -0.235 ...
#> $ int : num [1:603] 5 4.2 5 5 3.8 4.6 5 3 4.2 NA ...
#> $ pc : num [1:603] 4.5 3.5 4 3.5 3.5 4 3.5 3 3 NA ...
#> $ uv : num [1:603] 4.33 4 3.67 5 3.5 ...
#> - attr(*, "spec")=List of 3
#> ..$ cols :List of 30
#> .. ..$ student_id : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ course_id : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ total_points_possible: list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ total_points_earned : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ percentage_earned : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ subject : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ semester : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ section : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ Gradebook_Item : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ Grade_Category : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_logical" "collector"
#> .. ..$ FinalGradeCEMS : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ Points_Possible : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ Points_Earned : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ Gender : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_character" "collector"
#> .. ..$ q1 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q2 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q3 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q4 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q5 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q6 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q7 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q8 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q9 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ q10 : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ TimeSpent : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ TimeSpent_hours : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ TimeSpent_std : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ int : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ pc : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> .. ..$ uv : list()
#> .. .. ..- attr(*, "class")= chr [1:2] "collector_double" "collector"
#> ..$ default: list()
#> .. ..- attr(*, "class")= chr [1:2] "collector_guess" "collector"
#> ..$ skip : num 1
#> ..- attr(*, "class")= chr "col_spec"