# Clarifying a Previous Item Response Theory Link

[This article was first published on

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

I wanted to thank those of you who have emailed and commented on my last post and its Link to Item Response Theory Presentations Using R. In the Psychometrics Centre website, it is not until Topic 7 called **Engaging Market Research**, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.

**Unidimensional IRT models for binary data**that we get to the R code for the ltm package. You need to download the data file called Poly_GHQ28_Course.txt before you can run the R code in the presentation.

Unfortunately, the data file contains the data for a polytomous IRT, and it needs one recode before you can use it. You do not need to do much, just recode the 2’s as 1’s. This code seems to work, and the presentation explains how to interpret the findings.

```
GHQ28 <- read.table(file.choose(),
header=TRUE, sep="\t",
na.strings="NA", dec=".",
strip.white=TRUE)
Anxiety<-GHQ28[ ,8:14]
library(ltm)
Anxiety2<-Anxiety
```

```
apply(Anxiety2, 2, table)
#recodes 2's to 1's
```

```
Anxiety2[Anxiety2==2]<-1
apply(Anxiety2, 2, table)
Result1PL<-rasch(Anxiety2)
summary(Result1PL)
plot(Result1PL)
Result2PL<-ltm(Anxiety2 ~ z1)
summary(Result2PL)
plot(Result2PL)
anova(Result1PL,Result2PL)
```

`#May require more than one run to converge`

```
Result3PL<-tpm(Anxiety2,control=c(iter.qN=10000,
GHk=50,verbose=TRUE),start.val="random")
summary(Result3PL)
```

```
plot(Result3PL)
anova(Result2PL,Result3PL)
```

If you are just starting to learn about item response theory, it might help if you watched an introductory video. There is no R code, but Nick Shryane is slow and deliberate. This video should fill in the gaps for many of you. It's called "What is Item Response Theory?" After 46 minutes, you ought to have a pretty good idea.

As always, I learn a great deal from your comments and emails. Thanks for your help.

To

**leave a comment**for the author, please follow the link and comment on their blog:**Engaging Market Research**.R-bloggers.com offers

**daily e-mail updates**about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.

Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.