Simulação de Respostas para o Modelo de Samejima

Olá Anna…

Primeiramente, você deverá definir o diretório que você irá trabalhar. Isso é importante para que o R salve a base de dados simulada na pasta em que você escolheu.

Irei explicar pelo Rstudio. Então, escreva:

setwd("C:/augustofilho/Anna/Rtcc")

Com o comando setwd, o R irá definir uma pasta padrão.

Em seguida, você deverá instalar em sua máquina o pacote mirt.

install.packages("mirt")

Logo, em seguida você deverá carregar o pacote.

require(mirt)
## Loading required package: mirt
## Loading required package: stats4
## Loading required package: lattice

Em seguida, você deverá executar o seguinte código no prompt do Rstudio:

anna_dados=function(n,m){

#n = número de linhas  (alunos)
#m = número de colunas (itens)
  
set.seed(1234)
a <- matrix(rep(1, m))
d <- matrix(c(1,0.5,-.5,-1), m, 4, byrow = TRUE)
c <- seq(-1, 1, length.out=m)
data <- simdata(a, d + c, n, itemtype = rep('graded',m))

cat("\nRespostas Simuladas:\n\n") 
return(data)

}

Agora, iremos testar o código:

anna_dados(10,10) 
## 
## Respostas Simuladas:
##       Item_1 Item_2 Item_3 Item_4 Item_5 Item_6 Item_7 Item_8 Item_9
##  [1,]      0      0      0      0      4      0      1      0      0
##  [2,]      0      0      4      4      4      3      2      3      2
##  [3,]      4      4      4      0      4      4      4      4      4
##  [4,]      0      0      0      0      0      2      0      0      0
##  [5,]      0      0      4      4      4      4      4      4      4
##  [6,]      1      4      4      2      0      2      3      4      4
##  [7,]      0      0      2      2      0      2      2      4      4
##  [8,]      4      0      0      4      2      0      0      4      4
##  [9,]      1      3      0      0      0      0      0      4      2
## [10,]      0      1      1      1      2      4      1      4      0
##       Item_10
##  [1,]       4
##  [2,]       4
##  [3,]       0
##  [4,]       0
##  [5,]       4
##  [6,]       0
##  [7,]       1
##  [8,]       4
##  [9,]       4
## [10,]       3

Temos um banco de itens com m=10 e n=10, ou seja, 10 alunos para 10 itens.

Para levar para o excel, execute a instrução abaixo:

#=====================================================================
#Levar para o excel no formato csv
#=====================================================================
#Respostas de 100 alunos com 80 itens
anna100x80=as.data.frame(anna_dados(100,80))
## 
## Respostas Simuladas:
attach(anna100x80)
write.csv2(anna100x80,"anna100x80.csv",row.names = T)

Agora, abra o excel e procure em todos os arquivos e encontre o arquivo com o nome anna100x80.csv e execute o eirt do excel.