rawData <- read.csv("J50S100.csv")
head(rawData) X item1 item2 item3 item4 item5 item6 item7 item8 item9 item10 item11
1 Student1 1 0 1 1 1 0 1 1 0 1 1
2 Student2 0 0 0 1 1 0 1 0 0 1 1
3 Student3 1 0 0 1 1 0 0 1 0 1 0
4 Student4 1 0 0 1 1 0 0 0 0 1 1
5 Student5 0 0 0 0 1 0 0 0 0 1 0
6 Student6 0 0 0 1 0 1 0 0 0 1 1
item12 item13 item14 item15 item16 item17 item18 item19 item20 item21 item22
1 1 1 0 1 1 0 0 1 -99 0 1
2 1 1 0 1 1 0 0 0 1 1 1
3 1 1 0 1 1 0 0 0 1 1 1
4 1 1 0 1 1 0 0 1 1 0 1
5 0 0 0 0 1 0 0 0 1 1 1
6 1 1 0 1 1 0 0 1 1 0 -99
item23 item24 item25 item26 item27 item28 item29 item30 item31 item32 item33
1 1 0 0 0 0 0 1 1 1 0 1
2 0 0 0 0 1 1 1 -99 0 0 1
3 0 0 0 0 1 0 0 0 1 0 0
4 1 0 0 1 0 1 1 0 0 0 0
5 1 -99 0 0 1 1 0 0 0 0 0
6 1 0 0 0 0 1 1 0 0 0 0
item34 item35 item36 item37 item38 item39 item40 item41 item42 item43 item44
1 0 1 0 1 0 0 1 1 0 0 1
2 0 0 0 0 0 0 0 1 0 0 1
3 0 0 0 0 1 1 0 0 1 0 1
4 0 1 0 0 -99 0 1 0 0 0 0
5 0 1 0 0 1 0 0 1 1 0 1
6 0 0 0 1 1 1 0 1 0 0 0
item45 item46 item47 item48 item49 item50
1 1 0 1 0 1 1
2 1 0 0 0 1 0
3 1 1 1 0 0 0
4 1 0 1 0 1 1
5 1 0 0 0 1 1
6 1 1 1 0 0 0


