Eu posso sugerir pelo menos dois pacotes que permitem executar essas tarefas: psych ( score.items
) e ltm ( descript
). O pacote CTT parece também processar o MCQ, mas não tenho experiência com ele. Mais informações podem ser encontradas no site de W Revelle, The Personality Project , esp. a página dedicada à psicometria com R, que fornece instruções passo a passo para importar, analisar e relatar dados. Além disso, a exibição de tarefas CRAN em psicometria inclui muitos recursos adicionais.
Conforme descrito no seu link, MC significa "Pontuação média total bruta das pessoas que responderam ao item com a resposta correta" e MI para "Pontuação média total das pessoas que não responderam o item com a resposta correta". A correlação ponto-biserial (R (IT)) também está disponível no ltm
pacote ( biserial.cor
). Este é basicamente um indicador do poder de discriminação do item (já que é a correlação do item e a pontuação total) e está relacionado ao parâmetro de discriminação de um modelo de TRI-2-PL ou carga fatorial na Análise Fatorial.
Se você realmente deseja reproduzir a tabela exibida, acho que precisará envolver parte desse código com código personalizado, pelo menos para gerar o mesmo tipo de tabela. Fiz um exemplo rápido e sujo que reproduz sua tabela:
dat <- replicate(10, sample(LETTERS[1:4], 100, rep=TRUE))
dat[3,2] <- dat[67,5] <- NA
itan(dat)
P R MC MI NC OMIT A B C D
[1,] 0.23 -0.222 2.870 2.169 23 0 23 22 32 23
[2,] 0.32 -0.378 3.062 1.985 32 1 32 20 14 33
[3,] 0.18 -0.197 2.889 2.207 18 0 18 33 22 27
[4,] 0.33 -0.467 3.212 1.896 33 0 33 18 29 20
[5,] 0.27 -0.355 3.111 2.056 27 1 27 23 23 26
[6,] 0.17 -0.269 3.118 2.169 17 0 17 25 25 33
[7,] 0.21 -0.260 3.000 2.152 21 0 21 24 25 30
[8,] 0.24 -0.337 3.125 2.079 24 0 24 32 22 22
[9,] 0.13 -0.218 3.077 2.218 13 0 13 29 33 25
[10,] 0.25 -0.379 3.200 2.040 25 0 25 25 31 19
Como são respostas aleatórias, a correlação biserial e a dificuldade do item não são muito significativas (exceto para verificar se os dados são realmente aleatórios :). Além disso, vale a pena verificar possíveis erros, já que eu desenhei a função R em 10 '...
freq.resp <- raw.resp/apply(raw.resp, 1, sum, na.rm=T)
. O erro é que "dim (X) deve ter um comprimento positivo" enquanto dim (raw.resp) é NULL. Será que, como meus dados não têm todas as opções com frequências positivas, minhas tabelas não têm o mesmo comprimento? Como posso preencher os zeros na minhatable
invocação?