root = Card([header, activeLearners, completionRate, avgQuizScore, coursesRanked, atRiskLearners, cohortSelect, engagementChart, messageBtn])
header = CardHeader("Analytics Dashboard")
activeLearners = TextContent("1,250", "large")
completionRate = Tag("85%", null, "md", "success")
avgQuizScore = TextContent("82%", "large")
coursesRanked = Table([Col("Course", ["Intro", "Advanced", "Data Science", "Web Dev"], "string"), Col("Enrollment", [120, 250, 80, 150], "number")])
atRiskLearners = ListBlock([ListItem("John Doe"), ListItem("Anna Smith"), ListItem("Mike Johnson")])
cohortSelect = Select("cohort", [cohortA, cohortB, cohortC], "Choose a cohort")
cohortA = SelectItem("Cohort A", "Cohort A")
cohortB = SelectItem("Cohort B", "Cohort B")
cohortC = SelectItem("Cohort C", "Cohort C")
engagementChart = LineChart(["W1","W2","W3","W4","W5","W6","W7","W8"], Series("Engagement", [1200,1500,1700,1600,1800,2000,2100,1900]), "natural", "Week", "Sessions")
messageBtn = Button("Message Cohort", null, "primary")