You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
312 lines
14 KiB
312 lines
14 KiB
require "rails_helper"
|
|
include AnalyzeHelper
|
|
include Analyze::Graph::Column
|
|
|
|
describe GroupedBarColumnPresenter do
|
|
let(:school) { create(:school) }
|
|
let(:academic_year) { create(:academic_year, range: "1900-01") }
|
|
let(:another_academic_year) { create(:academic_year, range: "2000-01") }
|
|
let(:academic_years) { [academic_year, another_academic_year] }
|
|
let(:year_index) { academic_years.find_index(academic_year) }
|
|
let(:watch_low_benchmark) { 2 }
|
|
let(:growth_low_benchmark) { 3 }
|
|
let(:approval_low_benchmark) { 4 }
|
|
let(:ideal_low_benchmark) { 4.5 }
|
|
|
|
let(:measure_with_student_survey_items) { create(:measure, name: "Student measure") }
|
|
let(:scale_with_student_survey_item) { create(:student_scale, measure: measure_with_student_survey_items) }
|
|
let(:student_survey_item) do
|
|
create(:student_survey_item, scale: scale_with_student_survey_item,
|
|
watch_low_benchmark:,
|
|
growth_low_benchmark:,
|
|
approval_low_benchmark:,
|
|
ideal_low_benchmark:)
|
|
end
|
|
|
|
let(:measure_with_teacher_survey_items) { create(:measure, name: "Teacher measure") }
|
|
let(:scale_with_teacher_survey_item) { create(:teacher_scale, measure: measure_with_teacher_survey_items) }
|
|
let(:teacher_survey_item) do
|
|
create(:teacher_survey_item, scale: scale_with_teacher_survey_item,
|
|
watch_low_benchmark:,
|
|
growth_low_benchmark:,
|
|
approval_low_benchmark:,
|
|
ideal_low_benchmark:)
|
|
end
|
|
|
|
let(:measure_composed_of_student_and_teacher_items) { create(:measure, name: "Student and teacher measure") }
|
|
let(:student_scale_for_composite_measure) do
|
|
create(:student_scale, measure: measure_composed_of_student_and_teacher_items)
|
|
end
|
|
let(:student_survey_item_for_composite_measure) do
|
|
create(:student_survey_item, scale: student_scale_for_composite_measure,
|
|
watch_low_benchmark:,
|
|
growth_low_benchmark:,
|
|
approval_low_benchmark:,
|
|
ideal_low_benchmark:)
|
|
end
|
|
let(:teacher_scale_for_composite_measure) do
|
|
create(:teacher_scale, measure: measure_composed_of_teacher_and_teacher_items)
|
|
end
|
|
let(:teacher_survey_item_for_composite_measure) do
|
|
create(:teacher_survey_item, scale: teacher_scale_for_composite_measure,
|
|
watch_low_benchmark:,
|
|
growth_low_benchmark:,
|
|
approval_low_benchmark:,
|
|
ideal_low_benchmark:)
|
|
end
|
|
|
|
let(:measure_without_admin_data_items) do
|
|
create(
|
|
:measure,
|
|
name: "Some Title"
|
|
)
|
|
end
|
|
|
|
let(:student_presenter) do
|
|
GroupedBarColumnPresenter.new construct: measure_with_student_survey_items, school:, academic_years:,
|
|
position: 0, number_of_columns: 3, config: Analyze::Graph::Column::AllStudent.new
|
|
end
|
|
|
|
let(:teacher_presenter) do
|
|
GroupedBarColumnPresenter.new construct: measure_with_teacher_survey_items, school:, academic_years:,
|
|
position: 0, number_of_columns: 3, config: Analyze::Graph::Column::AllTeacher.new
|
|
end
|
|
|
|
let(:all_data_presenter) do
|
|
GroupedBarColumnPresenter.new construct: measure_composed_of_student_and_teacher_items, school:, academic_years:,
|
|
position: 0, number_of_columns: 3, config: Analyze::Graph::Column::AllData.new
|
|
end
|
|
|
|
before do
|
|
create(:respondent, school:, academic_year:, total_students: 1, total_teachers: 1)
|
|
end
|
|
|
|
shared_examples_for "measure_name" do
|
|
it "returns the measure name" do
|
|
expect(student_presenter.construct_name).to eq "Student measure"
|
|
end
|
|
end
|
|
|
|
shared_examples_for "column_midpoint" do
|
|
it "return an x position centered in the width of the column" do
|
|
expect(student_presenter.column_midpoint).to eq 29
|
|
end
|
|
end
|
|
|
|
shared_examples_for "bar_color" do
|
|
it "returns the correct color" do
|
|
expect(student_presenter.bars[year_index].color).to eq colors[year_index]
|
|
end
|
|
end
|
|
|
|
shared_examples_for "y_offset" do
|
|
it "bar will be based on the approval low benchmark boundary" do
|
|
expect(student_presenter.bars[year_index].y_offset).to be_within(0.01).of(34)
|
|
end
|
|
end
|
|
|
|
context "for a grouped column presenter with both student and teacher responses" do
|
|
context "with a single year"
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD,
|
|
survey_item: student_survey_item_for_composite_measure,
|
|
school:,
|
|
academic_year:,
|
|
likert_score: 4)
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD,
|
|
survey_item: student_survey_item_for_composite_measure, school:,
|
|
academic_year:,
|
|
likert_score: 5)
|
|
end
|
|
|
|
it "returns a score that is an average of the likert scores " do
|
|
expect(all_data_presenter.score(academic_year:).average).to eq 4.5
|
|
expect(all_data_presenter.score(academic_year: another_academic_year).average).to eq nil
|
|
expect(all_data_presenter.academic_years[0].range).to be academic_year.range
|
|
expect(all_data_presenter.academic_years[1].range).to be another_academic_year.range
|
|
end
|
|
context "when more than one year exists" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item_for_composite_measure, school:,
|
|
academic_year: another_academic_year, likert_score: 5)
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item_for_composite_measure, school:,
|
|
academic_year: another_academic_year, likert_score: 3)
|
|
end
|
|
it "returns independent scores for each year of data" do
|
|
expect(all_data_presenter.score(academic_year:).average).to eq 4.5
|
|
expect(all_data_presenter.score(academic_year: another_academic_year).average).to eq 4
|
|
end
|
|
end
|
|
end
|
|
|
|
context "when a measure is based on student survey items" do
|
|
context "when there is insufficient data to show a score" do
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
|
|
it "returns an emty score" do
|
|
expect(student_presenter.score(academic_year:).average).to eq nil
|
|
end
|
|
|
|
it "shows the irrelevancy message " do
|
|
expect(student_presenter.show_irrelevancy_message?).to eq true
|
|
end
|
|
|
|
it "shows the insufficient data message" do
|
|
expect(student_presenter.show_insufficient_data_message?).to eq true
|
|
end
|
|
end
|
|
|
|
context "when the score is in the Ideal zone" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 5)
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 4)
|
|
end
|
|
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
it_behaves_like "bar_color"
|
|
|
|
it "returns a bar width equal to the approval zone width plus the proportionate ideal zone height" do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to be_within(0.01).of(17)
|
|
end
|
|
|
|
it "returns a y_offset equal to the " do
|
|
expect(student_presenter.bars[0].y_offset).to be_within(0.01).of(17)
|
|
end
|
|
|
|
it "returns a text representation of the type of survey the bars are based on" do
|
|
expect(student_presenter.basis).to eq "student surveys"
|
|
end
|
|
|
|
it "returns only bars that have a numeric score" do
|
|
expect(student_presenter.bars.count).to be 1
|
|
end
|
|
|
|
it "returns an explanatory bar label" do
|
|
expect(student_presenter.label).to eq %w[All Students]
|
|
end
|
|
|
|
it "does not show a message that the data source is irrelevant for this measure" do
|
|
expect(student_presenter.show_irrelevancy_message?).to be false
|
|
end
|
|
|
|
it "does not show a message about insufficient responses" do
|
|
expect(student_presenter.show_insufficient_data_message?).to be false
|
|
end
|
|
|
|
context "when there is more than one years worth of data to show" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year: another_academic_year, likert_score: 3)
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year: another_academic_year, likert_score: 4)
|
|
end
|
|
|
|
it "returns only bars that have a numeric score" do
|
|
expect(student_presenter.bars.count).to be 2
|
|
end
|
|
end
|
|
end
|
|
|
|
context "when the score is in the Approval zone" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 4)
|
|
end
|
|
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
it_behaves_like "bar_color"
|
|
# it_behaves_like 'y_offset'
|
|
|
|
context "and the score is right at the approval low benchmark" do
|
|
it "where bar would normally have a height of 0, we inflate the height to be at least the minimum bar height of #{Analyze::BarPresenter::MINIMUM_BAR_HEIGHT}" do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to be_within(0.01).of(Analyze::BarPresenter::MINIMUM_BAR_HEIGHT)
|
|
end
|
|
|
|
it "where the bar would normally start at the approval low benchmark, it shifts up to accomodate it being grown to the minimum bar height of #{Analyze::BarPresenter::MINIMUM_BAR_HEIGHT}" do
|
|
expect(student_presenter.bars[year_index].y_offset).to be_within(0.01).of(analyze_zone_height * 2 - Analyze::BarPresenter::MINIMUM_BAR_HEIGHT)
|
|
end
|
|
end
|
|
end
|
|
context "when the score is in the Growth zone" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 3)
|
|
end
|
|
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
it_behaves_like "bar_color"
|
|
it_behaves_like "y_offset"
|
|
|
|
it "returns a bar width equal to the proportionate growth zone width" do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to be_within(0.01).of(17)
|
|
end
|
|
|
|
context "when the score is less than 5 percent away from the approval low benchmark line" do
|
|
before do
|
|
create_list(:survey_item_response, 80, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 4)
|
|
end
|
|
|
|
it "it rounds to the the minimum bar height of #{Analyze::BarPresenter::MINIMUM_BAR_HEIGHT} " do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to be_within(0.01).of(Analyze::BarPresenter::MINIMUM_BAR_HEIGHT)
|
|
end
|
|
end
|
|
end
|
|
|
|
context "when the score is in the Watch zone" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 2)
|
|
end
|
|
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
it_behaves_like "bar_color"
|
|
it_behaves_like "y_offset"
|
|
|
|
it "returns a bar width equal to the proportionate watch zone width plus the growth zone width" do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to eq 34
|
|
end
|
|
end
|
|
context "when the score is in the Warning zone" do
|
|
before do
|
|
create_list(:survey_item_response, SurveyItemResponse::STUDENT_RESPONSE_THRESHOLD, survey_item: student_survey_item, school:,
|
|
academic_year:, likert_score: 1)
|
|
end
|
|
|
|
it_behaves_like "measure_name"
|
|
it_behaves_like "column_midpoint"
|
|
it_behaves_like "bar_color"
|
|
it_behaves_like "y_offset"
|
|
|
|
it "returns a bar width equal to the proportionate warning zone width plus the watch & growth zone widths" do
|
|
expect(student_presenter.bars[year_index].bar_height_percentage).to eq 51
|
|
end
|
|
end
|
|
end
|
|
|
|
context "when the measure is based on teacher survey items" do
|
|
context "when there are insufficient responses to calculate a score" do
|
|
it "indicates it should show the insufficient data message" do
|
|
expect(teacher_presenter.show_insufficient_data_message?).to eq true
|
|
end
|
|
end
|
|
context "when there are enough responses to calculate a score" do
|
|
before do
|
|
create(:survey_item_response, survey_item: teacher_survey_item, school:,
|
|
academic_year:)
|
|
end
|
|
|
|
it "indicates it should show the insufficient data message" do
|
|
expect(teacher_presenter.show_insufficient_data_message?).to eq false
|
|
end
|
|
end
|
|
end
|
|
end
|