In KopfLab/tbltools: Tools for Team-Based-Learning

library(tbltools)
knitr::opts_chunk$set(echo = FALSE, message = FALSE)
# Note: with echo = FALSE and message = FALSE as the default, code blocks do not show up on the final knitted document unless otherwise specified. 
# This means that code blocks can also be used to keep notes for onself when designing an iRAT/tRAT.

Instructions for individual readiness assessment test (iRAT)

# Note:
# You can write anything for the instructions. All markdown formatting will work.
# You can also use R code using the `r ...` syntax.

1. Put your name, the module (r module) and today's date (r format(Sys.Date(), "%m/%d/%Y")) on the test.

2. Answer each question four times (i.e., as though there were four separate questions). Each question is worth a maximum of four points and you will receive one point for each correct answer. For example, if you are confident with your answer for a question, you should answer the same letter for each of the four numbers. If you are correct, you will receive the maximum of four points. If you are debating between two answers and cannot decide which is correct, you can answer twice one of the letters and twice the other or any combination of answers in the four numbers assigned to the question. Each question states which four answers belong to it (e.g. iRAT 9-12).

3. When you are finished (or the time is up), return the test.

Instructions for the immediate feedback test (tRAT)

1. When the time is up, have one member of your team turn in the envelopes to the instructor and collect the IF-AT sheet for your team.

2. Complete the test with your team using the IF-AT sheet.

3. Tally your team's tRAT with the following scoring guide: 4 points for one scratch, 2 points for 2 scratches, 1 point for 3 scratches and zero if you have to scratch four or more to reveal the correct answer.

4. Review appeals form and complete if appropriate. Return the IF-AT when the time is up.

Questions

Choose the best answer among the alternatives. Remember that RATs are closed book.

RAT <-
  tbl_create_RAT_from_excel(
    "demo.xlsx",
    filter_include = TRUE,
    fill_down_questions = TRUE
  ) %>% 
  tbl_arrange_RAT_questions(
    by = "semi-random",
    fixed_number_column = "number",
    group_by_column = "group",
    tRAT_n_start = 13,
    iRAT_n_start = 1,
    iRAT_sel_per_q = 4,
    random_seed = 42
  )
RAT

# Note: results = 'asis' is important to render the generated markdown
RAT %>%
  tbl_generate_RAT_choices(
    answer_layout = "vertical", # default layout
    answer_layout_column = "layout", # custom question layout
    random_seed = 42
  )

KopfLab/tbltools documentation built on July 30, 2023, 11:16 p.m.