h_append_grade_groups(
list(
"Any Grade" = as.character(1:5),
"Grade 1-2" = c("1", "2"),
"Grade 3-4" = c("3", "4")
),
list("1" = 10, "2" = 20, "3" = 30, "4" = 40, "5" = 50)
)
h_append_grade_groups(
list(
"Any Grade" = as.character(5:1),
"Grade A" = "5",
"Grade B" = c("4", "3")
),
list("1" = 10, "2" = 20, "3" = 30, "4" = 40, "5" = 50)
)
h_append_grade_groups(
list(
"Any Grade" = as.character(1:5),
"Grade 1-2" = c("1", "2"),
"Grade 3-4" = c("3", "4")
),
list("1" = 10, "2" = 5, "3" = 0)
)
Run the code above in your browser using DataLab