{ "cells": [ { "cell_type": "markdown", "metadata": { "collapsed": false }, "source": [ "# Are there cursing students on CoCalc?\n", "\n", "Sure, we have it all.\n", "\n", "[Item Response Theory](https://en.wikipedia.org/wiki/Item_response_theory) dataset, fed into a [Rasch model](https://en.wikipedia.org/wiki/Rasch_model), and plotted.\n", "\n", "Excerpt taken out of R's CRAN package [\"psychotools\"](https://cran.r-project.org/web/packages/psychotools/):\n", "\n", "> The 24 items are constructed by factorial combination of four different frustrating situations (see\n", "> below), three possible **verbally aggressive responses (curse, scold, shout)**, and two behavioural\n", "> models (want, do). The four situations are\n", ">\n", "> * S1: A bus fails to stop for me.\n", "> * S2: I miss a train because a clerk gave me faulty information.\n", "> * S3: The grocery store closes just as I am about to enter.\n", "> * S4: The operator disconnects me when I used up my last 10 cents for a call.\n", ">\n", "> Note that the first two situations are other-to-blame situations, and the latter two are self-to-blame\n", "> situations.\n", "> The subjects were **316 first-year psychology students from a university in the Dutch speaking part\n", "> of Belgium**." ] }, { "cell_type": "code", "execution_count": 5, "metadata": { "collapsed": false }, "outputs": [ { "name": "stderr", "output_type": "stream", "text": [ "Loading required package: psychotools\n" ] } ], "source": [ "require(\"psychotools\")" ] }, { "cell_type": "code", "execution_count": 6, "metadata": { "collapsed": false }, "outputs": [ ], "source": [ "data(\"VerbalAggression\", package = \"psychotools\")" ] }, { "cell_type": "code", "execution_count": 7, "metadata": { "collapsed": false }, "outputs": [ { "data": { "text/html": [ "316" ] }, "execution_count": 7, "metadata": { }, "output_type": "execute_result" } ], "source": [ "nrow(VerbalAggression)" ] }, { "cell_type": "code", "execution_count": 8, "metadata": { "collapsed": false }, "outputs": [ { "data": { "text/html": [ "
S1WantCurse | S1DoCurse | S1WantScold | S1DoScold | S1WantShout | S1DoShout | S2WantCurse | S2DoCurse | S2WantScold | S2DoScold | ⋯ | S3WantScold | S3DoScold | S3WantShout | S3DoShout | S4WantCurse | S4DoCurse | S4WantScold | S4DoScold | S4WantShout | S4DoShout |
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
0 | 1 | 0 | 0 | 0 | 1 | 0 | 1 | 0 | 0 | ⋯ | 0 | 0 | 1 | 0 | 1 | 1 | 0 | 1 | 0 | 1 |
0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | ⋯ | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
1 | 0 | 1 | 1 | 1 | 1 | 1 | 0 | 0 | 0 | ⋯ | 0 | 0 | 0 | 0 | 0 | 1 | 0 | 0 | 0 | 0 |
1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | ⋯ | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
1 | 1 | 0 | 1 | 1 | 0 | 1 | 1 | 0 | 0 | ⋯ | 0 | 0 | 0 | 0 | 1 | 1 | 0 | 0 | 0 | 0 |
1 | 1 | 1 | 0 | 0 | 0 | 1 | 1 | 0 | 0 | ⋯ | 1 | 0 | 1 | 0 | 0 | 1 | 0 | 1 | 0 | 0 |
1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | ⋯ | 0 | 0 | 1 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
0 | 1 | 0 | 0 | 0 | 0 | 0 | 1 | 0 | 0 | ⋯ | 0 | 0 | 0 | 0 | 0 | 1 | 0 | 0 | 0 | 0 |
0 | 1 | 0 | 0 | 0 | 0 | 1 | 1 | 1 | 0 | ⋯ | 0 | 0 | 1 | 1 | 1 | 0 | 0 | 1 | 0 | 0 |
1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | 1 | ⋯ | 0 | 0 | 1 | 0 | 1 | 1 | 1 | 1 | 1 | 1 |