plotINF: Plot Information Curves

Description Usage Arguments Author(s) See Also Examples

Description

Plot Category/Item/Test Information functions for nominal response models and nested logit models.

Usage

1

Arguments

x

An object of class nrm or nelm.

...

More arguments for plot.

Author(s)

Manuel Reif

See Also

nrm

nelm

plot_ldistr

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
## Not run: 
## simulating data

NUMBI <- 5
ParList <- lapply(1:NUMBI,function(x)
{
  Item1 <- c(c(-2,-1,1,2),c(-1.2,0.3,0.2,0.7))
  names(Item1) <- c(paste("zeta",1:4,sep=""),paste("lamb",1:4,sep=""))
  Item1
})


names(ParList) <- paste("item",1:NUMBI,sep="")

perp1 <- rnorm(5000,0,1)
perp2 <- rnorm(5000,1,1)

simdat1 <- NRM.sim(ParList,perp1)
simdat2 <- NRM.sim(ParList,perp2)

simdat1 <- data.frame(ID=1:5000,simdat1)
simdat2 <- data.frame(ID=5001:10000,simdat2)

simdatalla <- merge(simdat1,simdat2,all=T)
simdatall  <- simdatalla[,-1]

head(simdatall)
gruAB <- factor(rep(c("A","B"),each=5000))

DAT1 <- data.frame(simdatall,ABgroup = gruAB)

head(DAT1)

## reshaping the data
reshOBJ <- reshMG(DAT1,items=1:NUMBI,groups=NUMBI+1,correct=rep(0,NUMBI))


## estimating the model
examp1 <- nrm(reshOBJ, ctrl=list(nodes=31))


## End(Not run) 

# loading the estimated model, because estimating the model during example check takes too long

data(examp1)

plotINF(examp1)

manuelreif/mcIRT documentation built on May 21, 2019, 11:26 a.m.