Генерация ответа превосходит все сгенерированные экзамены в R / экзаменах - PullRequest
Новая
       137

Генерация ответа превосходит все сгенерированные экзамены в R / экзаменах

1 голос
/ 15 апреля 2020

Я профессор из Университетского колледжа в Генте (Бельгия), и мы проводим мозговой штурм по поводу организации наших экзаменов, Research Techniques (немало статистики). Мы думаем о том, чтобы подготовить индивидуальные экзамены для всех наших студентов, но мы хотим сделать оценку как можно более простой.

Мы думали о том, чтобы сгенерировать n экзаменов, используя R-экзамены и позволить студентам ответить с помощью Google. формы / формы OneDrive или любая другая платформа для создания превосходных ответов от всех студентов. Содержание каждого вектора ответов будет различным, хотя тип ответа на каждый вопрос будет одинаковым.

Если было бы замечательно, если бы мы могли создать лист Excel для ответов со всеми ответами на каждый сгенерированный экзамен: Таким образом, нам нужно только разделить ответ, предоставленный студентами, с ответами, полученными в результате R-экзаменов. Эта функция доступна или возможна?

С уважением

Jens Buysse

1 Ответ

1 голос
/ 16 апреля 2020

Функциональность, которую вы ищете, не всегда доступна в R / экзаменах, но не так уж сложно написать небольшой код, который ее объединит.

Все exams2xyz() интерфейсы возвращают список экзамены, содержащие список упражнений, содержащий (среди прочего) метаинформацию по каждому вопросу. Вы можете извлечь это и поместить в лист Excel.

Также вы можете использовать экстрактор exams_metainfo() для отображения информации в R.

В качестве простого примера рассмотрим: 

library("exams")
set.seed(0)
exm <- exams2html(c("swisscapital.Rmd", "deriv.Rmd"), n = 3)

Теперь exm - это список из n = 3 экзаменов, каждый из которых содержит 2 упражнения, для которых затем можно извлечь метаинформацию. Например, для первого упражнения в первом экзамене: 

exm[[1]][[1]]$metainfo$name
## [1] "Swiss Capital"
exm[[1]][[1]]$metainfo$solution
## [1] FALSE FALSE FALSE TRUE FALSE
exm[[1]][[1]]$metainfo$string
## [1] "Swiss Capital: 4"

Чтобы отобразить эту информацию в R: 

exams_metainfo(exm)
## exam1
## 1. Swiss Capital: 4
## 2. derivative exp: 55.25 (55.24--55.26)
## 
## exam2
## 1. Swiss Capital: 2
## 2. derivative exp: 1.79 (1.78--1.8)
## 
## exam3
## 1. Swiss Capital: 4
## 2. derivative exp: 46.73 (46.72--46.74)

Вы также можете получить только один экзамен с помощью метода print(): 

print(exams_metainfo(exm), 2)
## exam2
## 1. Swiss Capital: 2
## 2. derivative exp: 1.79 (1.78--1.8)
...