Skip to contents

Student Surveys

student_surveys.Rmd

tntpmetrics calculates engagement, relevance, and belonging metrics from student surveys. The list below shows the required column names to calculate each metric.

  • Engagement
    • Metric name to use in package: metric = engagement
    • Items: (“We spend time in class on things that…”)
      • eng_interest (“What we were learning was interesting.”)
      • eng_like (“I liked what we did in class.”)
      • eng_losttrack (“I was so into what we were learning I lost track of time.”)
      • eng_moreabout (“I thought more about what we were learning than anything else.”)
    • Scale: 0 (Not True), 1 (A Little True), 2 (Mostly True), or 3 (Very True).
  • Relevance
    • Metric name to use in package: metric = relevance
    • Items: (“We spend time in class on things that…”)
      • rel_asmuch (“Will help me learn just as much as kids in other schools.”)
      • rel_future (“Are important to my future goals.”)
      • rel_outside (“I can use outside of school.”)
      • rel_rightnow (“Are important to my life right now.”)
    • Scale: 0 (Not True), 1 (A Little True), 2 (Mostly True), or 3 (Very True).
  • Belonging
    • Metric name to use in package: metric = belonging
    • Items:
      • bel_ideas (“In this class, my ideas really count.”)
      • tch_interestedideas (“In this class, my teacher is interested in my ideas.”)
      • bel_fitin (“In this class, I feel like I fit in.”)
      • tch_problem (“I could talk to my teacher for this class if I had a problem.”)
    • Scale: 0 (Not True), 1 (A Little True), 2 (Mostly True), or 3 (Very True).

Engagement 

# data set in tntpmetrics package
data(ss_data_initial)

ss_data_initial %>%
  select(response_id, starts_with('eng')) %>%
  make_metric(metric = "engagement") %>%
  head() %>%
  kable()
#> [1] "6 Row(s) in data were NOT used because missing at least one value needed to create common measure."
response_id eng_interest eng_like eng_losttrack eng_moreabout cm_engagement cm_binary_engagement
3 2 2 2 2 8 TRUE
39 2 3 2 2 9 TRUE
73 2 2 2 2 8 TRUE
84 2 2 2 2 8 TRUE
85 2 3 2 2 9 TRUE
94 2 2 2 2 8 TRUE

Relevance 

ss_data_initial %>%
  select(response_id, starts_with('rel')) %>%
  make_metric(metric = "relevance") %>%
  head() %>%
  kable()
#> [1] "5 Row(s) in data were NOT used because missing at least one value needed to create common measure."
response_id rel_asmuch rel_future rel_outside rel_rightnow cm_relevance cm_binary_relevance
3 2 2 2 2 8 TRUE
39 2 3 2 2 9 TRUE
73 2 2 2 2 8 TRUE
84 2 3 2 2 9 TRUE
85 2 2 2 2 8 TRUE
94 3 2 2 2 9 TRUE

Belonging 

ss_data_initial %>%
  select(response_id, starts_with('bel'), starts_with('tch')) %>%
  make_metric(metric = "belonging") %>%
  head() %>%
  kable()
#> [1] "4 Row(s) in data were NOT used because missing at least one value needed to create common measure."
response_id bel_fitin bel_ideas tch_interestedideas tch_problem cm_belonging cm_binary_belonging
3 3 3 2 2 10 TRUE
39 2 2 2 2 8 TRUE
73 2 2 2 3 9 TRUE
84 2 3 2 2 9 TRUE
85 2 2 2 2 8 TRUE
94 2 2 3 2 9 TRUE