Secondary Courses to Level of Study • obt

library(obt)
library(dplyr)

Recoding Course Number to Level of Study

This function takes the fifth digit of the course number (ENG2D, FSF3U) and creates a vector with the level of study.

L = Locally Developed
P = Applied
D = Academic
E = Workplace
C = College
U = University
O = Open
M = University/College
N = Alternative Education
W = De-streamed


set.seed (325)
sec_rc |> 
  select (id, course_number) |> 
  mutate (level_study = obt_sec_level_study(course_number)) |> 
  slice_sample (n = 10)
#> # A tibble: 10 × 3
#>        id course_number level_study       
#>     <int> <chr>         <chr>             
#>  1 824079 SNC1D         Academic          
#>  2 969169 AVI2OF        Open              
#>  3 809554 SCH3U         University        
#>  4 833526 TGJ4M         University/College
#>  5 791443 SNC1DL        Academic          
#>  6 864275 MAT1L         Locally Developed 
#>  7 713483 TDJ2O         Open              
#>  8 783411 ENG2DA        Academic          
#>  9 667311 SPH3U         University        
#> 10 956068 MFM1P         Applied