dirty commit: can't get references to work correctly between any tables

app/presenters/dashboard/analyze/graph/all_data.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class AllData
+      include Analyze::Graph::Column
+      def to_s
+        "All Data"
+      end
+
+      def slug
+        "all-data"
+      end
+
+      def columns
+        [AllStudent, AllTeacher, AllAdmin, GroupedBarColumnPresenter]
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/all_admin.rb

@@ -0,0 +1,39 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      class AllAdmin < GroupedBarColumnPresenter
+        def label
+          %w[All Admin]
+        end
+
+        def basis
+          "admin data"
+        end
+
+        def show_irrelevancy_message?
+          !measure.includes_admin_data_items?
+        end
+
+        def show_insufficient_data_message?
+          !academic_years.any? do |year|
+            measure.sufficient_admin_data?(school:, academic_year: year)
+          end
+        end
+
+        def insufficiency_message
+          ["data not", "available"]
+        end
+
+        def score(year_index)
+          measure.admin_score(school:, academic_year: academic_years[year_index])
+        end
+
+        def type
+          :admin
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/all_student.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      class AllStudent < GroupedBarColumnPresenter
+        def label
+          %w[All Students]
+        end
+
+        def show_irrelevancy_message?
+          !measure.includes_student_survey_items?
+        end
+
+        def show_insufficient_data_message?
+          scores = academic_years.map do |year|
+            measure.score(school:, academic_year: year)
+          end
+
+          scores.all? { |score| !score.meets_student_threshold? }
+        end
+
+        def score(year_index)
+          measure.student_score(school:, academic_year: academic_years[year_index])
+        end
+
+        def type
+          :student
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/all_survey_data.rb

@@ -0,0 +1,47 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      class AllSurveyData < GroupedBarColumnPresenter
+        def label
+          %w[Survey Data]
+        end
+
+        def show_irrelevancy_message?
+          false
+        end
+
+        def show_insufficient_data_message?
+          scores = academic_years.map do |year|
+            combined_score(school:, academic_year: year)
+          end
+
+          scores.all? { |score| !score.meets_student_threshold? && !score.meets_teacher_threshold? }
+        end
+
+        def score(year_index)
+          combined_score(school:, academic_year: academic_years[year_index])
+        end
+
+        def type
+          :all_survey_data
+        end
+
+        private
+
+        def combined_score(school:, academic_year:)
+          teacher_score = measure.teacher_score(school:, academic_year:)
+          student_score = measure.student_score(school:, academic_year:)
+
+          averages = []
+          averages << student_score.average unless student_score.average.nil?
+          averages << teacher_score.average unless teacher_score.average.nil?
+          average = averages.average if averages.length > 0
+          combined_score = Score.new(average:, meets_student_threshold: student_score.meets_student_threshold,
+                                     meets_teacher_threshold: teacher_score.meets_teacher_threshold)
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/all_teacher.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      class AllTeacher < GroupedBarColumnPresenter
+        def label
+          %w[All Teachers]
+        end
+
+        def basis
+          "teacher surveys"
+        end
+
+        def show_irrelevancy_message?
+          !measure.includes_teacher_survey_items?
+        end
+
+        def show_insufficient_data_message?
+          scores = academic_years.map do |year|
+            measure.score(school:, academic_year: year)
+          end
+
+          scores.all? { |score| !score.meets_teacher_threshold? }
+        end
+
+        def score(year_index)
+          measure.teacher_score(school:, academic_year: academic_years[year_index])
+        end
+
+        def type
+          :teacher
+        end
+
+        def n_size(year_index)
+          SurveyItemResponse.where(survey_item: measure.teacher_survey_items, school:,
+            academic_year: academic_years[year_index]).select(:response_id).distinct.count
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/ell_column/ell.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module EllColumn
+        class Ell < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::EllColumn::ScoreForEll
+          include Analyze::Graph::Column::EllColumn::EllCount
+          def label
+            %w[ELL]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def ell
+            ::Ell.find_by_slug "ell"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/ell_column/ell_count.rb

@@ -0,0 +1,18 @@
+module Analyze
+  module Graph
+    module Column
+      module EllColumn
+        module EllCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.where(ell:, survey_item: measure.student_survey_items, school:, grade: grades(year_index),
+                                     academic_year: academic_years[year_index]).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/ell_column/not_ell.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module EllColumn
+        class NotEll < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::EllColumn::ScoreForEll
+          include Analyze::Graph::Column::EllColumn::EllCount
+          def label
+            ["Not ELL"]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def ell
+            ::Ell.find_by_slug "not-ell"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/ell_column/score_for_ell.rb

@@ -0,0 +1,42 @@
+module Analyze
+  module Graph
+    module Column
+      module EllColumn
+        module ScoreForEll
+          def score(year_index)
+            academic_year = academic_years[year_index]
+            meets_student_threshold = sufficient_student_responses?(academic_year:)
+            return Score::NIL_SCORE unless meets_student_threshold
+
+            averages = SurveyItemResponse.averages_for_ell(measure.student_survey_items, school, academic_year,
+                                                           ell)
+            average = bubble_up_averages(averages:).round(2)
+
+            Score.new(average:,
+                      meets_teacher_threshold: false,
+                      meets_student_threshold:,
+                      meets_admin_data_threshold: false)
+          end
+
+          def bubble_up_averages(averages:)
+            measure.student_scales.map do |scale|
+              scale.survey_items.map do |survey_item|
+                averages[survey_item]
+              end.remove_blanks.average
+            end.remove_blanks.average
+          end
+
+          def sufficient_student_responses?(academic_year:)
+            return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+            yearly_counts = SurveyItemResponse.where(school:, academic_year:,
+                                                     ell:, survey_item: measure.student_survey_items).group(:ell).select(:response_id).distinct(:response_id).count
+            yearly_counts.any? do |count|
+              count[1] >= 10
+            end
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/ell_column/unknown.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module EllColumn
+        class Unknown < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::EllColumn::ScoreForEll
+          include Analyze::Graph::Column::EllColumn::EllCount
+          def label
+            %w[Unknown]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def ell
+            ::Ell.find_by_slug "unknown"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/female.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        class Female < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::GenderColumn::ScoreForGender
+          include Analyze::Graph::Column::GenderColumn::GenderCount
+          def label
+            %w[Female]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def gender
+            ::Gender.find_by_qualtrics_code 1
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/gender_count.rb

@@ -0,0 +1,18 @@
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        module GenderCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.where(gender:, survey_item: measure.student_survey_items, school:, grade: grades(year_index),
+                                     academic_year: academic_years[year_index]).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/male.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        class Male < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::GenderColumn::ScoreForGender
+          include Analyze::Graph::Column::GenderColumn::GenderCount
+          def label
+            %w[Male]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def gender
+            ::Gender.find_by_qualtrics_code 2
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/non_binary.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        class NonBinary < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::GenderColumn::ScoreForGender
+          include Analyze::Graph::Column::GenderColumn::GenderCount
+          def label
+            %w[Non-Binary]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def gender
+            ::Gender.find_by_qualtrics_code 4
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/score_for_gender.rb

@@ -0,0 +1,42 @@
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        module ScoreForGender
+          def score(year_index)
+            academic_year = academic_years[year_index]
+            meets_student_threshold = sufficient_student_responses?(academic_year:)
+            return Score::NIL_SCORE unless meets_student_threshold
+
+            averages = SurveyItemResponse.averages_for_gender(measure.student_survey_items, school, academic_year,
+                                                              gender)
+            average = bubble_up_averages(averages:).round(2)
+
+            Score.new(average:,
+                      meets_teacher_threshold: false,
+                      meets_student_threshold:,
+                      meets_admin_data_threshold: false)
+          end
+
+          def bubble_up_averages(averages:)
+            measure.student_scales.map do |scale|
+              scale.survey_items.map do |survey_item|
+                averages[survey_item]
+              end.remove_blanks.average
+            end.remove_blanks.average
+          end
+
+          def sufficient_student_responses?(academic_year:)
+            return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+            yearly_counts = SurveyItemResponse.where(school:, academic_year:,
+                                                     gender:, survey_item: measure.student_survey_items).group(:gender).select(:response_id).distinct(:response_id).count
+            yearly_counts.any? do |count|
+              count[1] >= 10
+            end
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/gender_column/unknown.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module GenderColumn
+        class Unknown < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::GenderColumn::ScoreForGender
+          include Analyze::Graph::Column::GenderColumn::GenderCount
+          def label
+            %w[Unknown]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def gender
+            ::Gender.find_by_qualtrics_code 99
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/eight.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Eight < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 8]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            8
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/eleven.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Eleven < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 11]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            11
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/five.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Five < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 5]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            5
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/four.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Four < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 4]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            4
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/grade_count.rb

@@ -0,0 +1,18 @@
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        module GradeCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.where(grade:, survey_item: measure.student_survey_items, school:,
+                                     academic_year: academic_years[year_index]).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/nine.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Nine < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 9]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            9
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/one.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class One < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 1]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            1
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/score_for_grade.rb

@@ -0,0 +1,42 @@
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        module ScoreForGrade
+          def score(year_index)
+            academic_year = academic_years[year_index]
+            meets_student_threshold = sufficient_student_responses?(academic_year:)
+            return Score::NIL_SCORE unless meets_student_threshold
+
+            averages = SurveyItemResponse.averages_for_grade(measure.student_survey_items, school,
+                                                             academic_year, grade)
+            average = bubble_up_averages(averages:).round(2)
+
+            Score.new(average:,
+                      meets_teacher_threshold: false,
+                      meets_student_threshold:,
+                      meets_admin_data_threshold: false)
+          end
+
+          def bubble_up_averages(averages:)
+            measure.student_scales.map do |scale|
+              scale.survey_items.map do |survey_item|
+                averages[survey_item]
+              end.remove_blanks.average
+            end.remove_blanks.average
+          end
+
+          def sufficient_student_responses?(academic_year:)
+            return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+            yearly_counts = SurveyItemResponse.where(school:, academic_year:,
+                                                     survey_item: measure.student_survey_items).group(:grade).select(:response_id).distinct(:response_id).count
+            yearly_counts.any? do |count|
+              count[1] >= 10
+            end
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/seven.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Seven < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 7]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            7
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/six.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Six < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 6]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            6
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/ten.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Ten < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 10]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            10
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/three.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Three < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 3]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            3
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/twelve.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Twelve < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 12]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            12
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/two.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Two < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Grade 2]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            2
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grade/zero.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module Grade
+        class Zero < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::Grade::ScoreForGrade
+          include Analyze::Graph::Column::Grade::GradeCount
+          def label
+            %w[Kindergarten]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def grade
+            0
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/grouped_bar_column_presenter.rb

@@ -0,0 +1,172 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      class GroupedBarColumnPresenter
+        include AnalyzeHelper
+
+        attr_reader :measure_name, :measure_id, :category, :position, :measure, :school, :academic_years,
+                    :number_of_columns
+
+        def initialize(measure:, school:, academic_years:, position:, number_of_columns:)
+          @measure = measure
+          @measure_name = @measure.name
+          @measure_id = @measure.measure_id
+          @category = @measure.subcategory.category
+          @school = school
+          @academic_years = academic_years
+          @position = position
+          @number_of_columns = number_of_columns
+        end
+
+        def academic_year_for_year_index(year_index)
+          academic_years[year_index]
+        end
+
+        def score(year_index)
+          measure.score(school:, academic_year: academic_years[year_index]) || 0
+        end
+
+        def bars
+          @bars ||= yearly_scores.map.each_with_index do |yearly_score, index|
+            year = yearly_score.year
+            Analyze::BarPresenter.new(measure:, academic_year: year,
+                                      score: yearly_score.score,
+                                      x_position: bar_x(index),
+                                      color: bar_color(year))
+          end
+        end
+
+        def label
+          %w[All Data]
+        end
+
+        def show_irrelevancy_message?
+          false
+        end
+
+        def show_insufficient_data_message?
+          scores = academic_years.map do |year|
+            measure.score(school:, academic_year: year)
+          end
+
+          scores.all? do |score|
+            !score.meets_teacher_threshold? && !score.meets_student_threshold? && !score.meets_admin_data_threshold?
+          end
+        end
+
+        def column_midpoint
+          zone_label_width + (grouped_chart_column_width * (position + 1)) - (grouped_chart_column_width / 2)
+        end
+
+        def bar_width
+          min_bar_width(10.5 / data_sources)
+        end
+
+        def min_bar_width(number)
+          min_width = 2
+          number < min_width ? min_width : number
+        end
+
+        def message_x
+          column_midpoint - message_width / 2
+        end
+
+        def message_y
+          17
+        end
+
+        def message_width
+          20
+        end
+
+        def message_height
+          34
+        end
+
+        def column_end_x
+          zone_label_width + (grouped_chart_column_width * (position + 1))
+        end
+
+        def column_start_x
+          zone_label_width + (grouped_chart_column_width * position)
+        end
+
+        def grouped_chart_column_width
+          graph_width / data_sources
+        end
+
+        def bar_label_height
+          (100 - ((100 - analyze_graph_height) / 2))
+        end
+
+        def data_sources
+          number_of_columns
+        end
+
+        def basis
+          "student surveys"
+        end
+
+        def type
+          :all_data
+        end
+
+        def show_popover?
+          %i[student teacher].include? type
+        end
+
+        def n_size(year_index)
+          SurveyItemResponse.where(survey_item: measure.student_survey_items, school:, grade: grades(year_index),
+                                   academic_year: academic_years[year_index]).select(:response_id).distinct.count
+        end
+
+        def popover_content(year_index)
+          "#{n_size(year_index)} #{type.to_s.capitalize}s"
+        end
+
+        def insufficiency_message
+          ["survey response", "rate below 25%"]
+        end
+
+        def sufficient_data?(year_index)
+          case basis
+          when "student"
+            score(year_index).meets_student_threshold
+          when "teacher"
+            score(year_index).meets_teacher_threshold
+          else
+            true
+          end
+        end
+
+        def grades(year_index)
+          Respondent.by_school_and_year(school:, academic_year: academic_years[year_index]).enrollment_by_grade.keys
+        end
+
+        private
+
+        YearlyScore = Struct.new(:year, :score)
+        def yearly_scores
+          yearly_scores = academic_years.each_with_index.map do |year, index|
+            YearlyScore.new(year, score(index))
+          end
+          yearly_scores.reject do |yearly_score|
+            yearly_score.score.blank?
+          end
+        end
+
+        def bar_color(year)
+          @available_academic_years ||= AcademicYear.order(:range).all
+          colors[@available_academic_years.find_index(year)]
+        end
+
+        def bar_x(index)
+          column_start_x + (index * bar_width * 1.2) +
+            ((column_end_x - column_start_x) - (yearly_scores.size * bar_width * 1.2)) / 2
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/income_column/disadvantaged.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module IncomeColumn
+        class Disadvantaged < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::IncomeColumn::ScoreForIncome
+          include Analyze::Graph::Column::IncomeColumn::IncomeCount
+          def label
+            %w[Economically Disadvantaged]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def income
+            Income.find_by_designation "Economically Disadvantaged - Y"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/income_column/income_count.rb

@@ -0,0 +1,18 @@
+module Analyze
+  module Graph
+    module Column
+      module IncomeColumn
+        module IncomeCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.where(income:, survey_item: measure.student_survey_items, school:, grade: grades(year_index),
+                                     academic_year: academic_years[year_index]).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/income_column/not_disadvantaged.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module IncomeColumn
+        class NotDisadvantaged < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::IncomeColumn::ScoreForIncome
+          include Analyze::Graph::Column::IncomeColumn::IncomeCount
+          def label
+            ["Not Economically", "Disadvantaged"]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def income
+            Income.find_by_designation "Economically Disadvantaged - N"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/income_column/score_for_income.rb

@@ -0,0 +1,42 @@
+module Analyze
+  module Graph
+    module Column
+      module IncomeColumn
+        module ScoreForIncome
+          def score(year_index)
+            academic_year = academic_years[year_index]
+            meets_student_threshold = sufficient_student_responses?(academic_year:)
+            return Score::NIL_SCORE unless meets_student_threshold
+
+            averages = SurveyItemResponse.averages_for_income(measure.student_survey_items, school, academic_year,
+                                                              income)
+            average = bubble_up_averages(averages:).round(2)
+
+            Score.new(average:,
+                      meets_teacher_threshold: false,
+                      meets_student_threshold:,
+                      meets_admin_data_threshold: false)
+          end
+
+          def bubble_up_averages(averages:)
+            measure.student_scales.map do |scale|
+              scale.survey_items.map do |survey_item|
+                averages[survey_item]
+              end.remove_blanks.average
+            end.remove_blanks.average
+          end
+
+          def sufficient_student_responses?(academic_year:)
+            return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+            yearly_counts = SurveyItemResponse.where(school:, academic_year:,
+                                                     income:, survey_item: measure.student_survey_items).group(:income).select(:response_id).distinct(:response_id).count
+            yearly_counts.any? do |count|
+              count[1] >= 10
+            end
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/income_column/unknown.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module IncomeColumn
+        class Unknown < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::IncomeColumn::ScoreForIncome
+          include Analyze::Graph::Column::IncomeColumn::IncomeCount
+          def label
+            ["Unknown"]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def income
+            Income.find_by_designation "Unknown"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/american_indian.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class AmericanIndian < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[American Indian]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 1
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/asian.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class Asian < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[Asian]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 2
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/black.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class Black < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[Black]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 3
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/hispanic.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class Hispanic < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[Hispanic]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 4
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/middle_eastern.rb

@@ -0,0 +1,30 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class MiddleEastern < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+
+          def label
+            %w[Middle Eastern]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 8
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/multiracial.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class Multiracial < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[Multiracial]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 100
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/race_count.rb

@@ -0,0 +1,20 @@
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        module RaceCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.joins("JOIN student_races on survey_item_responses.student_id = student_races.student_id JOIN students on students.id = student_races.student_id").where(
+              school:, academic_year: academic_years[year_index],
+              survey_item: measure.student_survey_items
+            ).where("student_races.race_id": race.id).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/unknown.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class Unknown < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[Not Listed]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 99
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/race_column/white.rb

@@ -0,0 +1,29 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module RaceColumn
+        class White < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::ScoreForRace
+          include Analyze::Graph::Column::RaceColumn::RaceCount
+          def label
+            %w[White]
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def race
+            Race.find_by_qualtrics_code 5
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/score_for_race.rb

@@ -0,0 +1,40 @@
+module Analyze
+  module Graph
+    module Column
+      module ScoreForRace
+        def score(year_index)
+          academic_year = academic_years[year_index]
+          meets_student_threshold = sufficient_student_responses?(academic_year:)
+          return Score::NIL_SCORE unless meets_student_threshold
+
+          survey_items = measure.student_survey_items
+
+          averages = SurveyItemResponse.averages_for_race(school, academic_year, race)
+          average = bubble_up_averages(averages:).round(2)
+
+          Score.new(average:,
+                    meets_teacher_threshold: false,
+                    meets_student_threshold:,
+                    meets_admin_data_threshold: false)
+        end
+
+        def bubble_up_averages(averages:)
+          measure.student_scales.map do |scale|
+            scale.survey_items.map do |survey_item|
+              averages[survey_item.id]
+            end.remove_blanks.average
+          end.remove_blanks.average
+        end
+
+        def sufficient_student_responses?(academic_year:)
+          return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+          number_of_students_for_a_racial_group = SurveyItemResponse.joins("JOIN student_races on survey_item_responses.student_id = student_races.student_id JOIN students on students.id = student_races.student_id").where(
+            school:, academic_year:
+          ).where("student_races.race_id": race.id).distinct.pluck(:student_id).count
+          number_of_students_for_a_racial_group >= 10
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/sped_column/not_sped.rb

@@ -0,0 +1,34 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module SpedColumn
+        class NotSped < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::SpedColumn::ScoreForSped
+          include Analyze::Graph::Column::SpedColumn::SpedCount
+
+          def label
+            ["Not Special", "Education"]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def sped
+            ::Sped.find_by_slug "not-special-education"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/sped_column/score_for_sped.rb

@@ -0,0 +1,42 @@
+module Analyze
+  module Graph
+    module Column
+      module SpedColumn
+        module ScoreForSped
+          def score(year_index)
+            academic_year = academic_years[year_index]
+            meets_student_threshold = sufficient_student_responses?(academic_year:)
+            return Score::NIL_SCORE unless meets_student_threshold
+
+            averages = SurveyItemResponse.averages_for_sped(measure.student_survey_items, school, academic_year,
+                                                            sped)
+            average = bubble_up_averages(averages:).round(2)
+
+            Score.new(average:,
+                      meets_teacher_threshold: false,
+                      meets_student_threshold:,
+                      meets_admin_data_threshold: false)
+          end
+
+          def bubble_up_averages(averages:)
+            measure.student_scales.map do |scale|
+              scale.survey_items.map do |survey_item|
+                averages[survey_item]
+              end.remove_blanks.average
+            end.remove_blanks.average
+          end
+
+          def sufficient_student_responses?(academic_year:)
+            return false unless measure.subcategory.response_rate(school:, academic_year:).meets_student_threshold?
+
+            yearly_counts = SurveyItemResponse.where(school:, academic_year:,
+                                                     sped:, survey_item: measure.student_survey_items).group(:sped).select(:response_id).distinct(:response_id).count
+            yearly_counts.any? do |count|
+              count[1] >= 10
+            end
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/sped_column/sped.rb

@@ -0,0 +1,34 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module SpedColumn
+        class Sped < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::SpedColumn::ScoreForSped
+          include Analyze::Graph::Column::SpedColumn::SpedCount
+
+          def label
+            %w[Special Education]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def sped
+            ::Sped.find_by_slug "special-education"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/sped_column/sped_count.rb

@@ -0,0 +1,18 @@
+module Analyze
+  module Graph
+    module Column
+      module SpedColumn
+        module SpedCount
+          def type
+            :student
+          end
+
+          def n_size(year_index)
+            SurveyItemResponse.where(sped:, survey_item: measure.student_survey_items, school:, grade: grades(year_index),
+                                     academic_year: academic_years[year_index]).select(:response_id).distinct.count
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/column/sped_column/unknown.rb

@@ -0,0 +1,34 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    module Column
+      module SpedColumn
+        class Unknown < GroupedBarColumnPresenter
+          include Analyze::Graph::Column::SpedColumn::ScoreForSped
+          include Analyze::Graph::Column::SpedColumn::SpedCount
+
+          def label
+            %w[Unknown]
+          end
+
+          def basis
+            "student"
+          end
+
+          def show_irrelevancy_message?
+            false
+          end
+
+          def show_insufficient_data_message?
+            false
+          end
+
+          def sped
+            ::Sped.find_by_slug "unknown"
+          end
+        end
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_and_teachers.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsAndTeachers
+      include Analyze::Graph::Column
+      def to_s
+        'Students & Teachers'
+      end
+
+      def slug
+        'students-and-teachers'
+      end
+
+      def columns
+        [AllStudent, AllTeacher, AllSurveyData]
+      end
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_ell.rb

@@ -0,0 +1,44 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsByEll
+      include Analyze::Graph::Column::EllColumn
+      attr_reader :ells
+
+      def initialize(ells:)
+        @ells = ells
+      end
+
+      def to_s
+        "Students by Ell"
+      end
+
+      def slug
+        "students-by-ell"
+      end
+
+      def columns
+        [].tap do |array|
+          ells.each do |ell|
+            array << column_for_ell_code(code: ell.slug)
+          end
+          array.sort_by!(&:to_s)
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_ell_code(code:)
+        CFR[code]
+      end
+
+      CFR = {
+        "ell" => Analyze::Graph::Column::EllColumn::Ell,
+        "not-ell" => Analyze::Graph::Column::EllColumn::NotEll,
+        "unknown" => Analyze::Graph::Column::EllColumn::Unknown
+      }.freeze
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_gender.rb

@@ -0,0 +1,45 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsByGender
+      include Analyze::Graph::Column::GenderColumn
+      attr_reader :genders
+
+      def initialize(genders:)
+        @genders = genders
+      end
+
+      def to_s
+        "Students by Gender"
+      end
+
+      def slug
+        "students-by-gender"
+      end
+
+      def columns
+        [].tap do |array|
+          genders.each do |gender|
+            array << column_for_gender_code(code: gender.qualtrics_code)
+          end
+          array.sort_by!(&:to_s)
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_gender_code(code:)
+        CFR[code]
+      end
+
+      CFR = {
+        1 => Analyze::Graph::Column::GenderColumn::Female,
+        2 => Analyze::Graph::Column::GenderColumn::Male,
+        4 => Analyze::Graph::Column::GenderColumn::NonBinary,
+        99 => Analyze::Graph::Column::GenderColumn::Unknown
+      }.freeze
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_grade.rb

@@ -0,0 +1,53 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsByGrade
+      include Analyze::Graph::Column::Grade
+      attr_reader :grades
+
+      def initialize(grades:)
+        @grades = grades
+      end
+
+      def to_s
+        "Students by Grade"
+      end
+
+      def slug
+        "students-by-grade"
+      end
+
+      def columns
+        [].tap do |array|
+          grades.each do |grade|
+            array << column_for_grade_code(code: grade)
+          end
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_grade_code(code:)
+        CFR[code]
+      end
+
+      CFR = {
+        0 => Zero,
+        1 => One,
+        2 => Two,
+        3 => Three,
+        4 => Four,
+        5 => Five,
+        6 => Six,
+        7 => Seven,
+        8 => Eight,
+        9 => Nine,
+        10 => Ten,
+        11 => Eleven,
+        12 => Twelve
+      }.freeze
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_income.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsByIncome
+      attr_reader :incomes
+
+      def initialize(incomes:)
+        @incomes = incomes
+      end
+
+      def to_s
+        "Students by income"
+      end
+
+      def slug
+        "students-by-income"
+      end
+
+      def columns
+        [].tap do |array|
+          incomes.each do |income|
+            array << column_for_income_code(code: income.slug)
+          end
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_income_code(code:)
+        CFR[code.to_s]
+      end
+
+      CFR = {
+        "economically-disadvantaged-y" => Analyze::Graph::Column::IncomeColumn::Disadvantaged,
+        "economically-disadvantaged-n" => Analyze::Graph::Column::IncomeColumn::NotDisadvantaged,
+        "unknown" => Analyze::Graph::Column::IncomeColumn::Unknown
+      }.freeze
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_race.rb

@@ -0,0 +1,47 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsByRace
+      attr_reader :races
+
+      def initialize(races:)
+        @races = races
+      end
+
+      def to_s
+        "Students by Race"
+      end
+
+      def slug
+        "students-by-race"
+      end
+
+      def columns
+        [].tap do |array|
+          races.each do |race|
+            array << column_for_race_code(code: race.qualtrics_code)
+          end
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_race_code(code:)
+        CFR[code.to_s]
+      end
+
+      CFR = {
+        "1" => Analyze::Graph::Column::RaceColumn::AmericanIndian,
+        "2" => Analyze::Graph::Column::RaceColumn::Asian,
+        "3" => Analyze::Graph::Column::RaceColumn::Black,
+        "4" => Analyze::Graph::Column::RaceColumn::Hispanic,
+        "5" => Analyze::Graph::Column::RaceColumn::White,
+        "8" => Analyze::Graph::Column::RaceColumn::MiddleEastern,
+        "99" => Analyze::Graph::Column::RaceColumn::Unknown,
+        "100" => Analyze::Graph::Column::RaceColumn::Multiracial
+      }.freeze
+    end
+  end
+end

app/presenters/dashboard/analyze/graph/students_by_sped.rb

@@ -0,0 +1,43 @@
+# frozen_string_literal: true
+
+module Analyze
+  module Graph
+    class StudentsBySped
+      include Analyze::Graph::Column::SpedColumn
+      attr_reader :speds
+
+      def initialize(speds:)
+        @speds = speds
+      end
+
+      def to_s
+        "Students by SpEd"
+      end
+
+      def slug
+        "students-by-sped"
+      end
+
+      def columns
+        [].tap do |array|
+          speds.each do |sped|
+            array << column_for_sped_code(code: sped.slug)
+          end
+          array << Analyze::Graph::Column::AllStudent
+        end
+      end
+
+      private
+
+      def column_for_sped_code(code:)
+        CFR[code]
+      end
+
+      CFR = {
+        "special-education" => Analyze::Graph::Column::SpedColumn::Sped,
+        "not-special-education" => Analyze::Graph::Column::SpedColumn::NotSped,
+        "unknown" => Analyze::Graph::Column::SpedColumn::Unknown
+      }.freeze
+    end
+  end
+end