df <- data.frame("Class" = rep(c("Class1", "Class2", "Class3"),each = 3),
"Grade" = c("Grade1","Grade2", "Grade3"),
"A" = sample(1:10, 9),
"B" = sample(1:10,9))
df |> e_charts() |> e_matrix(xAxis = "Class", yAxis = "Grade")
Run the code above in your browser using DataLab