IAT Anaysis

Loading Packages

Haven enables R to read and write various data formats used by other statistical packages by wrapping the fantastic ReadStat C library written by Evan Miller.

https://www.rdocumentation.org/packages/haven/versions/2.5.1

if (!require(haven)){
  install.packages("haven", dependencies = TRUE)
  library(haven)
}
Loading required package: haven

The tidyverse makes it easy for us to tidy, clean, manipulate and rearrange our data.

https://www.rdocumentation.org/packages/tidyverse/versions/1.3.2

if (!require(tidyverse)){
  install.packages("tidyverse", dependencies = TRUE)
  library(tidyverse)
}
Loading required package: tidyverse
── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.1     ✔ readr     2.1.4
✔ forcats   1.0.0     ✔ stringr   1.5.0
✔ ggplot2   3.4.2     ✔ tibble    3.2.1
✔ lubridate 1.9.2     ✔ tidyr     1.3.0
✔ purrr     1.0.1     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors

Data frame summaries, cross-tabulations, weight-enabled frequency tables and common descriptive (univariate) statistics in concise tables available in a variety of formats (plain ASCII, Markdown and HTML). A good point-of-entry for exploring data, both for experienced and new R users.

https://www.rdocumentation.org/packages/summarytools/versions/1.0.1

if (!require(summarytools)){
  install.packages("summarytools", dependencies = TRUE)
  require(summarytools)
}
Loading required package: summarytools
Warning in fun(libname, pkgname): couldn't connect to display ":0"
system might not have X11 capabilities; in case of errors when using dfSummary(), set st_options(use.x11 = FALSE)

Attaching package: 'summarytools'
The following object is masked from 'package:tibble':

    view

Afex interfaces for estimating standard ANOVAs with any number or combination of within-subjects or between-subjects variables.

https://www.rdocumentation.org/packages/afex/versions/1.2-1

if (!require(afex)){
  install.packages("afex", dependencies = TRUE)
  require(afex)
}
Loading required package: afex
Loading required package: lme4
Loading required package: Matrix

Attaching package: 'Matrix'
The following objects are masked from 'package:tidyr':

    expand, pack, unpack
************
Welcome to afex. For support visit: http://afex.singmann.science/
- Functions for ANOVAs: aov_car(), aov_ez(), and aov_4()
- Methods for calculating p-values with mixed(): 'S', 'KR', 'LRT', and 'PB'
- 'afex_aov' and 'mixed' objects can be passed to emmeans() for follow-up tests
- Get and set global package options with: afex_options()
- Set sum-to-zero contrasts globally: set_sum_contrasts()
- For example analyses see: browseVignettes("afex")
************

Attaching package: 'afex'
The following object is masked from 'package:lme4':

    lmer

Import Data

dataset.qualtrics <- read_sav("tattooqualtrics.sav")
dataset.iat <- read_csv("iat-results.csv")
Rows: 90 Columns: 3
── Column specification ────────────────────────────────────────────────────────
Delimiter: ","
chr (1): ResponseID
dbl (2): idid, dscore

ℹ Use `spec()` to retrieve the full column specification for this data.
ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

Clean Data

(dataset.qualtrics %>%
  left_join(y = dataset.iat, by = c("ResponseId" = "ResponseID")) %>% 
  filter(DistributionChannel != "preview") %>%
  filter(!is.na(dscore)) -> dataset.clean)
# A tibble: 24 × 61
   StartDate           EndDate             Status         Progress
   <dttm>              <dttm>              <dbl+lbl>         <dbl>
 1 2023-04-05 16:49:07 2023-04-05 16:57:20 0 [IP Address]      100
 2 2023-04-05 17:26:36 2023-04-05 17:38:47 0 [IP Address]      100
 3 2023-04-05 18:17:48 2023-04-05 18:28:02 0 [IP Address]      100
 4 2023-04-05 18:24:21 2023-04-05 18:33:43 0 [IP Address]      100
 5 2023-04-05 19:35:46 2023-04-05 19:43:20 0 [IP Address]      100
 6 2023-04-05 21:07:34 2023-04-05 21:16:06 0 [IP Address]      100
 7 2023-04-05 21:16:08 2023-04-05 21:27:24 0 [IP Address]      100
 8 2023-04-05 21:37:23 2023-04-05 21:46:35 0 [IP Address]      100
 9 2023-04-05 21:50:34 2023-04-05 22:00:45 0 [IP Address]      100
10 2023-04-06 08:45:58 2023-04-06 09:16:00 0 [IP Address]      100
# ℹ 14 more rows
# ℹ 57 more variables: Duration__in_seconds_ <dbl>, Finished <dbl+lbl>,
#   RecordedDate <dttm>, ResponseId <chr>, DistributionChannel <chr>,
#   UserLanguage <chr>, Q33_1 <dbl+lbl>, Q33_2 <dbl+lbl>, Q1_RP1 <chr>,
#   Q2_RP2 <chr>, Q3_RP3 <chr>, Q4_RP4 <chr>, Q5_RP5 <chr>, Q6_RP6 <chr>,
#   Q7_RP7 <chr>, Q8_RN1 <chr>, Q9_RN2 <chr>, Q10_RN3 <chr>, Q11_RN4 <chr>,
#   Q12_RN5 <chr>, Q13_RN6 <chr>, Q14_RN7 <chr>, Q15_LP1 <chr>, …

Get the Method Section Information

(dataset.clean %>% 
  mutate(age_as_a_number = as.numeric(Age_Demographics)) -> dataset.clean)
# A tibble: 24 × 62
   StartDate           EndDate             Status         Progress
   <dttm>              <dttm>              <dbl+lbl>         <dbl>
 1 2023-04-05 16:49:07 2023-04-05 16:57:20 0 [IP Address]      100
 2 2023-04-05 17:26:36 2023-04-05 17:38:47 0 [IP Address]      100
 3 2023-04-05 18:17:48 2023-04-05 18:28:02 0 [IP Address]      100
 4 2023-04-05 18:24:21 2023-04-05 18:33:43 0 [IP Address]      100
 5 2023-04-05 19:35:46 2023-04-05 19:43:20 0 [IP Address]      100
 6 2023-04-05 21:07:34 2023-04-05 21:16:06 0 [IP Address]      100
 7 2023-04-05 21:16:08 2023-04-05 21:27:24 0 [IP Address]      100
 8 2023-04-05 21:37:23 2023-04-05 21:46:35 0 [IP Address]      100
 9 2023-04-05 21:50:34 2023-04-05 22:00:45 0 [IP Address]      100
10 2023-04-06 08:45:58 2023-04-06 09:16:00 0 [IP Address]      100
# ℹ 14 more rows
# ℹ 58 more variables: Duration__in_seconds_ <dbl>, Finished <dbl+lbl>,
#   RecordedDate <dttm>, ResponseId <chr>, DistributionChannel <chr>,
#   UserLanguage <chr>, Q33_1 <dbl+lbl>, Q33_2 <dbl+lbl>, Q1_RP1 <chr>,
#   Q2_RP2 <chr>, Q3_RP3 <chr>, Q4_RP4 <chr>, Q5_RP5 <chr>, Q6_RP6 <chr>,
#   Q7_RP7 <chr>, Q8_RN1 <chr>, Q9_RN2 <chr>, Q10_RN3 <chr>, Q11_RN4 <chr>,
#   Q12_RN5 <chr>, Q13_RN6 <chr>, Q14_RN7 <chr>, Q15_LP1 <chr>, …
print(dfSummary(dataset.clean, graph.magnif = .75), method = "render")
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''
Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Warning in png(png_loc <- tempfile(fileext = ".png"), width = 150 *
graph.magnif, : unable to open connection to X11 display ''

Data Frame Summary

dataset.clean

Dimensions: 24 x 62
Duplicates: 0
No Variable Label Stats / Values Freqs (% of Valid) Graph Valid Missing
1 StartDate [POSIXct, POSIXt] Start Date
min : 2023-04-05 16:49:07
med : 2023-04-06 22:26:54
max : 2023-04-13 11:04:11
range : 7d 18H 15M 4S
24 distinct values 24 (100.0%) 0 (0.0%)
2 EndDate [POSIXct, POSIXt] End Date
min : 2023-04-05 16:57:20
med : 2023-04-07 01:23:31
max : 2023-04-13 11:13:22
range : 7d 18H 16M 2S
24 distinct values 24 (100.0%) 0 (0.0%)
3 Status [haven_labelled, vctrs_vctr, double] Response Type 1 distinct value
0:24(100.0%)
24 (100.0%) 0 (0.0%)
4 Progress [numeric] Progress
Min : 98
Mean : 99.9
Max : 100
98:1(4.2%)
100:23(95.8%)
24 (100.0%) 0 (0.0%)
5 Duration__in_seconds_ [numeric] Duration (in seconds)
Mean (sd) : 4562.6 (18576.9)
min ≤ med ≤ max:
389 ≤ 612.5 ≤ 91720
IQR (CV) : 213.5 (4.1)
24 distinct values 24 (100.0%) 0 (0.0%)
6 Finished [haven_labelled, vctrs_vctr, double] Finished
Min : 0
Mean : 1
Max : 1
0:1(4.2%)
1:23(95.8%)
24 (100.0%) 0 (0.0%)
7 RecordedDate [POSIXct, POSIXt] Recorded Date
min : 2023-04-05 16:57:20
med : 2023-04-07 04:48:28
max : 2023-04-14 06:35:46
range : 8d 13H 38M 26S
24 distinct values 24 (100.0%) 0 (0.0%)
8 ResponseId [character] Response ID
1. R_11YM45ocyLk7DYW
2. R_1IsjWMc39yCbjXW
3. R_1pnUEBbcewIehgX
4. R_1QxQ1DRZpKAzUfh
5. R_21pJvciGJEyghqy
6. R_238fMeMtqazKDZI
7. R_2aeWikQkF8dTPGN
8. R_2ayRdoXK4umcvBi
9. R_2bVpc9DF69qN9j5
10. R_2RaX6nCx3mPhP9l
[ 14 others ]
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
14(58.3%)
24 (100.0%) 0 (0.0%)
9 DistributionChannel [character] Distribution Channel 1. anonymous
24(100.0%)
24 (100.0%) 0 (0.0%)
10 UserLanguage [character] User Language 1. EN
24(100.0%)
24 (100.0%) 0 (0.0%)
11 Q33_1 [haven_labelled, vctrs_vctr, double] Agreement: I ATTEST THAT I AM AT LEAST 18 YEARS OLD. I HAVE HAD THE OPPORTUNITY TO READ THIS CONSENT FORM, ASK QUESTIONS ABOUT THE RESEARCH STUDY & I AM PREPARED TO PARTICIPATE IN THIS STUDY. 1 distinct value
1:24(100.0%)
24 (100.0%) 0 (0.0%)
12 Q33_2 [haven_labelled, vctrs_vctr, double] Agreement: DECLINE. (END SURVEY)
All NA's
0 (0.0%) 24 (100.0%)
13 Q1_RP1 [character] Negative Positive + Loading all the content... This should take less than 1 minute Instructions: Place your left and right index fingers on the E and I keys. At the top of the screen are 2 categories. In the task, words and/or images appear in the middle of the screen. When the word/image belongs to the category on the left, press the E key as fast as you can. When it belongs to the category on the right, press the I key as fast as you can. If you make an error, a red X will appear. Correct errors by hitting the other key. Please try to go as fast as you can while making as few errors as possible. When you are ready, please press the [Space] bar to begin. Part 1 of 7 x
1. (Empty string)
2. 11C1295,13C704,18C724,16C
3. 11C1474,15C856,16C982,14C
4. 11C3640,11X1862,18C1011,1
5. 12C1023,15C851,16C822,17C
6. 12C1122,16C1010,17C964,16
7. 13C2683,14C1037,12C913,18
8. 14C3592,11C109,13C1314,20
9. 19C3764,16C5331,18C1229,2
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
14 Q2_RP2 [character] People without Tattoos People with Tattoos + Loading all the content... This should take less than 1 minute Now, the categories have changed, but the rules remain the same. Please try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 2 of 7 x
1. (Empty string)
2. 10C2112,7C1036,7C1123,2C9
3. 10C2348,1C955,2C1132,8C10
4. 10C2841,1C926,8C932,9C918
5. 5C6576,1C1228,3C1730,7C10
6. 6C2998,10C861,10C624,5C79
7. 6C7668,10C3087,9C2243,7C1
8. 7C2363,6C911,7C706,3C762,
9. 9C2558,6C926,1C770,10C907
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
15 Q3_RP3 [character] Negative or People without Tattoos Positive or People with Tattoos + Loading all the content... This should take less than 1 minute Now the four categories you saw separately will appear together. Remember, each word/image fits in only one of the four categories. The label/item colors may help you identify the appropriate category. Use the E key for the two categories on the left and the I key for the two categories on the right. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. Practice this combination now. When you are ready, please press the [Space] bar to begin. Part 3 of 7 x
1. (Empty string)
2. 10C3275,13C3129,4C1181,17
3. 10X3598,12C879,4C768,15C8
4. 2C1357,20C904,5C904,18C10
5. 2C958,17C875,4C946,12C102
6. 4C3205,12C1007,7C969,17C9
7. 7C1402,17C705,10C804,12C8
8. 8C2469,18C1206,4C2895,12C
9. 9C4385,17C1237,7C1057,20C
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
16 Q4_RP4 [character] Negative or People without Tattoos Positive or People with Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 4 of 7 x
1. (Empty string)
2. 10C1355,14C845,3C757,19C7
3. 1C1390,19C1079,5C1083,12C
4. 1C945,14C683,9C723,12C887
5. 3C1393,12C895,10C863,14C8
6. 3C710,11C498,1C544,19C611
7. 7C1485,11C623,4C634,17C65
8. 7C1835,20C778,1C715,14C75
9. 8C1167,16C1012,5C1050,19C
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
17 Q5_RP5 [character] Positive Negative + Loading all the content... This should take less than 1 minute Notice the categories from before have switched sides. Please practice this new configuration now. Remember to try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 5 of 7 x
1. (Empty string)
2. 12C1726,18C668,16C724,20C
3. 14C836,11C781,11C716,15C7
4. 14X2317,13C948,19C675,16C
5. 15C900,15C558,11C559,16C6
6. 16C1182,15C818,15C769,19C
7. 16X3335,18C758,19C650,15C
8. 20C1403,11C952,11C598,17C
9. 20C1795,15C576,16C799,11C
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
18 Q6_RP6 [character] Positive or People without Tattoos Negative or People with Tattoos + Loading all the content... This should take less than 1 minute Notice the four categories have been combined again, but in a new configuration. Please practice this combination now, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 6 of 7 x
1. (Empty string)
2. 10X6786,19C1580,7C3693,18
3. 1C1406,14C1075,5C1058,18C
4. 2C1381,19X1850,1C1923,17C
5. 2C2447,14C1369,10C976,11X
6. 4C1727,13C1186,6C1075,11C
7. 4C1877,13C1674,3C1692,17C
8. 6C2287,12C1004,5C992,16C7
9. 8C4416,11C1001,1C1013,16C
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
19 Q7_RP7 [character] Positive or People without Tattoos Negative or People with Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 7 of 7 x
1. (Empty string)
2. 10C1550,17C789,4C1734,16C
3. 3C2479,17C868,6C922,11C10
4. 3C3446,17C1143,4C907,18C2
5. 4C1038,20C924,1C804,15C64
6. 4C2745,17C805,10C737,19C6
7. 5C1317,12C987,9C1093,20C8
8. 5C1906,19C963,4C719,12C75
9. 9C1530,20C769,4C589,15C75
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
20 Q8_RN1 [character] Negative Positive + Loading all the content... This should take less than 1 minute Instructions: Place your left and right index fingers on the E and I keys. At the top of the screen are 2 categories. In the task, words and/or images appear in the middle of the screen. When the word/image belongs to the category on the left, press the E key as fast as you can. When it belongs to the category on the right, press the I key as fast as you can. If you make an error, a red X will appear. Correct errors by hitting the other key. Please try to go as fast as you can while making as few errors as possible. When you are ready, please press the [Space] bar to begin. Part 1 of 7 x
1. (Empty string)
2. 12C1825,19C700,17C851,11C
3. 12C2425,14C1488,19C1714,1
4. 14C1506,13C928,17C1214,18
5. 18C1565,16C1124,11C764,20
6. 18C1965,11C1396,12C784,15
7. 20C1446,12C798,16C697,18C
8. 20C1460,14C836,12C660,13C
9. 20C1814,13C645,12C680,16C
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
21 Q9_RN2 [character] People with Tattoos People without Tattoos + Loading all the content... This should take less than 1 minute Now, the categories have changed, but the rules remain the same. Please try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 2 of 7 x
1. (Empty string)
2. 10C2891,10C1119,4C924,1C7
3. 10C3919,8C6902,9C2227,6C1
4. 1X13156,3X3851,4C5217,7C1
5. 3C8755,9C4441,5C1289,4C17
6. 3X4273,8X5961,6C1316,8C83
7. 4C3061,1C818,2C671,10C107
8. 6C3021,7C897,8C1107,3C784
9. 9C3544,4C1027,10C1149,6C7
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
22 Q10_RN3 [character] Negative or People with Tattoos Positive or People without Tattoos + Loading all the content... This should take less than 1 minute Now the four categories you saw separately will appear together. Remember, each word/image fits in only one of the four categories. The label/item colors may help you identify the appropriate category. Use the E key for the two categories on the left and the I key for the two categories on the right. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. Practice this combination now. When you are ready, please press the [Space] bar to begin. Part 3 of 7 x
1. (Empty string)
2. 3C1900,13C1160,1C907,14C7
3. 3C4654,20C952,1C731,19X97
4. 3X6370,19C4646,2C2375,13C
5. 4C6176,19C3500,8C2079,18C
6. 5C2399,15C1378,6C1441,12C
7. 6C6557,20C6400,8C2697,14C
8. 7C1942,19C901,6C992,17C97
9. 9C10041,17C1564,3C1632,19
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
23 Q11_RN4 [character] Negative or People with Tattoos Positive or People without Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 4 of 7 x
1. (Empty string)
2. 10C3715,11C887,6C956,20C8
3. 4C1603,12C1017,4C797,15C7
4. 5C1451,16C983,2C783,20X10
5. 6C1372,13C729,1X1339,18C7
6. 7C1517,20C838,10C990,17C1
7. 7C1592,15C1427,6C1201,13C
8. 7C2834,12C605,5C641,13C56
9. 9C1180,18C1344,4C948,17C1
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
24 Q12_RN5 [character] Positive Negative + Loading all the content... This should take less than 1 minute Notice the categories from before have switched sides. Please practice this new configuration now. Remember to try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 5 of 7 x
1. (Empty string)
2. 11C1382,20C1239,16C836,12
3. 13C838,11C700,15C628,11C5
4. 15C1208,20C993,16C1058,19
5. 18C1768,11C796,19C912,16C
6. 19C1023,17C843,18C593,18C
7. 19C1115,17C794,11C610,12C
8. 19C1487,18C557,12C911,15C
9. 20C1514,16C580,19C592,12X
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
25 Q13_RN6 [character] Positive or People with Tattoos Negative or People without Tattoos + Loading all the content... This should take less than 1 minute Notice the four categories have been combined again, but in a new configuration. Please practice this combination now, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 6 of 7 x
1. (Empty string)
2. 10C1748,16C1643,2C1551,12
3. 1C3012,20C1343,2C1245,13C
4. 1C6378,16C1045,2C926,12C1
5. 2C2628,11C1218,6C965,14C9
6. 2X4055,19C2075,8C2069,15C
7. 5C961,20C828,9C758,12C770
8. 8C924,13C780,1C908,11C742
9. 9C1167,16C837,4C716,12C71
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
26 Q14_RN7 [character] Positive or People with Tattoos Negative or People without Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 7 of 7 x
1. (Empty string)
2. 1C1055,12C581,6C657,11C65
3. 1C1227,13C1198,2C1055,19C
4. 1C1820,20C769,7C749,14C89
5. 1C765,19C599,9C827,19C610
6. 1C881,20C654,2C674,11C609
7. 2C1062,17C913,7C1517,18C6
8. 3C1231,15C620,8C815,12C61
9. 9C2612,19C545,6C731,16C80
16(66.7%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
27 Q15_LP1 [character] Positive Negative + Loading all the content... This should take less than 1 minute Instructions: Place your left and right index fingers on the E and I keys. At the top of the screen are 2 categories. In the task, words and/or images appear in the middle of the screen. When the word/image belongs to the category on the left, press the E key as fast as you can. When it belongs to the category on the right, press the I key as fast as you can. If you make an error, a red X will appear. Correct errors by hitting the other key. Please try to go as fast as you can while making as few errors as possible. When you are ready, please press the [Space] bar to begin. Part 1 of 7 x
1. (Empty string)
2. 14C1341,16C847,13C839,11C
3. 15C4466,18C1813,19C2356,1
4. 16C1247,17X2867,13C1029,1
5. 16C1587,12C777,18C987,17C
6. 18C3530,16X5290,19C920,15
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
28 Q16_LP2 [character] People with Tattoos People without Tattoos + Loading all the content... This should take less than 1 minute Now, the categories have changed, but the rules remain the same. Please try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 2 of 7 x
1. (Empty string)
2. 10C2373,6C667,8C606,9C604
3. 10C2482,9C1928,9C1871,8C4
4. 7C1288,5C918,6C903,6C904,
5. 8C2741,4C982,6C927,9C1310
6. 8C9601,2C1232,7C1372,3C10
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
29 Q17_LP3 [character] Positive or People with Tattoos Negative or People without Tattoos + Loading all the content... This should take less than 1 minute Now the four categories you saw separately will appear together. Remember, each word/image fits in only one of the four categories. The label/item colors may help you identify the appropriate category. Use the E key for the two categories on the left and the I key for the two categories on the right. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. Practice this combination now. When you are ready, please press the [Space] bar to begin. Part 3 of 7 x
1. (Empty string)
2. 10C3016,15C1904,7C809,19C
3. 3C1217,11C825,9C790,15C72
4. 3C1416,11C1010,1C1167,19C
5. 5C1123,14C1730,4C2214,18C
6. 7C4111,11C827,4C694,15C37
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
30 Q18_LP4 [character] Positive or People with Tattoos Negative or People without Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 4 of 7 x
1. (Empty string)
2. 1X1707,19C1080,8C1228,15C
3. 2X1843,14C843,5C798,13C74
4. 6C1323,15C845,5C665,18C68
5. 8C1075,19C870,1C946,19C73
6. 8C932,15C1143,5X2613,19C1
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
31 Q19_LP5 [character] Negative Positive + Loading all the content... This should take less than 1 minute Notice the categories from before have switched sides. Please practice this new configuration now. Remember to try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 5 of 7 x
1. (Empty string)
2. 11C2205,20C665,13C567,15C
3. 13C1019,12C693,15C659,19C
4. 14C891,11C643,18C1275,18C
5. 16C758,19C650,18C587,15C5
6. 19C1038,15C851,13X1516,17
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
32 Q20_LP6 [character] Negative or People with Tattoos Positive or People without Tattoos + Loading all the content... This should take less than 1 minute Notice the four categories have been combined again, but in a new configuration. Please practice this combination now, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 6 of 7 x
1. (Empty string)
2. 2C2092,11C1072,3C766,17C8
3. 5C1185,15C1578,6C1691,18C
4. 7C1009,17C1795,8X1629,15C
5. 8C1234,11C841,4C994,19C77
6. 9C1072,20C899,3C763,16X23
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
33 Q21_LP7 [character] Negative or People with Tattoos Positive or People without Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 7 of 7 x
1. (Empty string)
2. 2C1315,14C1340,8C974,13C9
3. 2X1944,12C1146,10C1664,17
4. 5C1234,13C703,3C773,11C59
5. 6C1062,15C884,7C788,19C12
6. 9C3515,16C1538,8C977,18C9
19(79.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
34 Q22_LN1 [character] Positive Negative + Loading all the content... This should take less than 1 minute Instructions: Place your left and right index fingers on the E and I keys. At the top of the screen are 2 categories. In the task, words and/or images appear in the middle of the screen. When the word/image belongs to the category on the left, press the E key as fast as you can. When it belongs to the category on the right, press the I key as fast as you can. If you make an error, a red X will appear. Correct errors by hitting the other key. Please try to go as fast as you can while making as few errors as possible. When you are ready, please press the [Space] bar to begin. Part 1 of 7 x
1. (Empty string)
2. 11C1563,12C909,15C999,20C
3. 11C1860,11C926,20C897,12C
4. 12C1171,20C568,15C544,16C
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
35 Q23_LN2 [character] People without Tattoos People with Tattoos + Loading all the content... This should take less than 1 minute Now, the categories have changed, but the rules remain the same. Please try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 2 of 7 x
1. (Empty string)
2. 10C3206,6C1224,9C759,7C78
3. 1C1508,5C759,6C831,4C859,
4. 8C22293,10C6663,2C1008,1C
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
36 Q24_LN3 [character] Positive or People without Tattoos Negative or People with Tattoos + Loading all the content... This should take less than 1 minute Now the four categories you saw separately will appear together. Remember, each word/image fits in only one of the four categories. The label/item colors may help you identify the appropriate category. Use the E key for the two categories on the left and the I key for the two categories on the right. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. Practice this combination now. When you are ready, please press the [Space] bar to begin. Part 3 of 7 x
1. (Empty string)
2. 1C2485,12C1763,5C765,17C7
3. 3C10653,13C1983,10C1216,1
4. 5X2516,19C3977,8X4921,20C
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
37 Q25_LN4 [character] Positive or People without Tattoos Negative or People with Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it. Again, try to go as fast as possible without making mistakes. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 4 of 7 x
1. (Empty string)
2. 3C1490,12C869,10C1079,11C
3. 7C1207,18C1036,10C1025,14
4. 8C1357,19C684,5X1003,17C6
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
38 Q26_LN5 [character] Negative Positive + Loading all the content... This should take less than 1 minute Notice the categories from before have switched sides. Please practice this new configuration now. Remember to try to go as fast as you can while making as few errors as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 5 of 7 x
1. (Empty string)
2. 13C1499,11C1104,20C1211,1
3. 13C760,17X908,17C598,20X1
4. 20C1723,15C589,11C640,16C
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
39 Q27_LN6 [character] Negative or People without Tattoos Positive or People with Tattoos + Loading all the content... This should take less than 1 minute Notice the four categories have been combined again, but in a new configuration. Please practice this combination now, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 6 of 7 x
1. (Empty string)
2. 4X4465,20C975,8C988,19C73
3. 5C1561,16X2137,9X1947,20C
4. 6C3100,19C1604,1C1724,11C
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
40 Q28_LN7 [character] Negative or People without Tattoos Positive or People with Tattoos + Loading all the content... This should take less than 1 minute Please continue the task as you were just doing it, and remember to go as fast as you can while making as few mistakes as possible. Correct errors by hitting the other key. When you are ready, please press the [Space] bar to begin. Part 7 of 7 x
1. (Empty string)
2. 3C1958,20C1695,7C1253,16C
3. 6C1912,13C802,7C919,15C90
4. 8X2116,11C848,1C660,13C62
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
41 Gender_Demographics [character] What gender do you identify as?
1. female
2. Female
3. Male
4. non-binary
5. Woman/female
6. women/ non-binary
13(54.2%)
6(25.0%)
2(8.3%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
42 Racial_Demographics [character] What is your race?
1. black
2. brown
3. Caucasian
4. Caucasion
5. Irish Australian
6. white
7. White
1(4.2%)
1(4.2%)
3(12.5%)
1(4.2%)
1(4.2%)
10(41.7%)
7(29.2%)
24 (100.0%) 0 (0.0%)
43 Age_Demographics [character] What is your age? (Must be 18 or older)
1. 21
2. 22
3. 20
4. 23
5. 24
6. 18
7. 19
8. 28
9. 31
10. 34
[ 4 others ]
5(20.8%)
4(16.7%)
2(8.3%)
2(8.3%)
2(8.3%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
4(16.7%)
24 (100.0%) 0 (0.0%)
44 Political_Demo..._1 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Conservative 1 distinct value
1:3(100.0%)
3 (12.5%) 21 (87.5%)
45 Political_Demo..._2 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Moderate 1 distinct value
1:3(100.0%)
3 (12.5%) 21 (87.5%)
46 Political_Demo..._3 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Liberal 1 distinct value
1:9(100.0%)
9 (37.5%) 15 (62.5%)
47 Political_Demo..._4 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Third-Party 1 distinct value
1:4(100.0%)
4 (16.7%) 20 (83.3%)
48 Political_Demo..._5 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Apolitical 1 distinct value
1:2(100.0%)
2 (8.3%) 22 (91.7%)
49 Political_Demo..._6 [haven_labelled, vctrs_vctr, double] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Selected Choice Other 1 distinct value
1:3(100.0%)
3 (12.5%) 21 (87.5%)
50 Political_Demo..._6_TEXT [character] What is your political association? (If you do not see your political association listed here, please select "other" and input your political association below). - Other - Text
1. (Empty string)
2. Leftist
3. NA
4. Non Party
21(87.5%)
1(4.2%)
1(4.2%)
1(4.2%)
24 (100.0%) 0 (0.0%)
51 Q34 [character] What do you think is the hypothesis for this survey? (What do you think the purpose of this survey was?)
1. Challenging your mind
2. determining whether or no
3. Do place positive and neg
4. I believe the purpose was
5. I think that it shows bia
6. I think the hypothesis is
7. if I had a pre conceived
8. If i have bias towards pe
9. If negative traits are di
10. People associate people w
[ 14 others ]
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
1(4.2%)
14(58.3%)
24 (100.0%) 0 (0.0%)
52 FL_23_DO_PositiveContextualPortrayal_Protagonistis18 [numeric] FL_23 - Block Randomizer - Display Order PositiveContextualPortrayal,Protagonistis18 1 distinct value
1:6(100.0%)
6 (25.0%) 18 (75.0%)
53 FL_23_DO_PositiveContextualPortrayal_Protagonistis40 [numeric] FL_23 - Block Randomizer - Display Order PositiveContextualPortrayal,Protagonistis40 1 distinct value
1:6(100.0%)
6 (25.0%) 18 (75.0%)
54 FL_23_DO_NegativeContextualPortrayal_Protagonistis18 [numeric] FL_23 - Block Randomizer - Display Order NegativeContextualPortrayal,Protagonistis18 1 distinct value
1:6(100.0%)
6 (25.0%) 18 (75.0%)
55 FL_23_DO_NegativeContextualPortrayal_Protagonistis40 [numeric] FL_23 - Block Randomizer - Display Order NegativeContextualPortrayal,Protagonistis40 1 distinct value
1:6(100.0%)
6 (25.0%) 18 (75.0%)
56 FL_6_DO_IAT1_CompatibleFirst_TargetAonRightwithPos_ [numeric] FL_6 - Block Randomizer - Display Order IAT1-CompatibleFirst[TargetAonRightwithPos] 1 distinct value
1:8(100.0%)
8 (33.3%) 16 (66.7%)
57 FL_6_DO_IAT2_IncompatibleFirst_TargetAonRightwithNeg_ [numeric] FL_6 - Block Randomizer - Display Order IAT2-IncompatibleFirst[TargetAonRightwithNeg] 1 distinct value
1:8(100.0%)
8 (33.3%) 16 (66.7%)
58 FL_6_DO_IAT3_CompatibleFirst_TargetAonLeftwithPos_ [numeric] FL_6 - Block Randomizer - Display Order IAT3-CompatibleFirst[TargetAonLeftwithPos] 1 distinct value
1:5(100.0%)
5 (20.8%) 19 (79.2%)
59 FL_6_DO_IAT4_IncompatibleFirst_TargetAonLeftwithNeg_ [numeric] FL_6 - Block Randomizer - Display Order IAT4-IncompatibleFirst[TargetAonLeftwithNeg] 1 distinct value
1:3(100.0%)
3 (12.5%) 21 (87.5%)
60 idid [numeric]
Mean (sd) : 49.5 (25.1)
min ≤ med ≤ max:
7 ≤ 46.5 ≤ 86
IQR (CV) : 41.8 (0.5)
24 distinct values 24 (100.0%) 0 (0.0%)
61 dscore [numeric]
Mean (sd) : 0.3 (0.5)
min ≤ med ≤ max:
-0.9 ≤ 0.3 ≤ 1.2
IQR (CV) : 0.7 (1.7)
24 distinct values 24 (100.0%) 0 (0.0%)
62 age_as_a_number [numeric]
Mean (sd) : 26.5 (9.4)
min ≤ med ≤ max:
18 ≤ 22 ≤ 53
IQR (CV) : 7.8 (0.4)
14 distinct values 24 (100.0%) 0 (0.0%)

Generated by summarytools 1.0.1 (R version 4.2.3)
2023-04-19

Create ContextIV

(dataset.clean %>%
  mutate(contextIV = case_when(FL_23_DO_PositiveContextualPortrayal_Protagonistis18 == 1 ~ "positive", FL_23_DO_PositiveContextualPortrayal_Protagonistis40 == 1 ~ "positive", FL_23_DO_NegativeContextualPortrayal_Protagonistis18 == 1 ~ "negative", FL_23_DO_NegativeContextualPortrayal_Protagonistis40 == 1 ~ "negative")) -> dataset.clean)
# A tibble: 24 × 63
   StartDate           EndDate             Status         Progress
   <dttm>              <dttm>              <dbl+lbl>         <dbl>
 1 2023-04-05 16:49:07 2023-04-05 16:57:20 0 [IP Address]      100
 2 2023-04-05 17:26:36 2023-04-05 17:38:47 0 [IP Address]      100
 3 2023-04-05 18:17:48 2023-04-05 18:28:02 0 [IP Address]      100
 4 2023-04-05 18:24:21 2023-04-05 18:33:43 0 [IP Address]      100
 5 2023-04-05 19:35:46 2023-04-05 19:43:20 0 [IP Address]      100
 6 2023-04-05 21:07:34 2023-04-05 21:16:06 0 [IP Address]      100
 7 2023-04-05 21:16:08 2023-04-05 21:27:24 0 [IP Address]      100
 8 2023-04-05 21:37:23 2023-04-05 21:46:35 0 [IP Address]      100
 9 2023-04-05 21:50:34 2023-04-05 22:00:45 0 [IP Address]      100
10 2023-04-06 08:45:58 2023-04-06 09:16:00 0 [IP Address]      100
# ℹ 14 more rows
# ℹ 59 more variables: Duration__in_seconds_ <dbl>, Finished <dbl+lbl>,
#   RecordedDate <dttm>, ResponseId <chr>, DistributionChannel <chr>,
#   UserLanguage <chr>, Q33_1 <dbl+lbl>, Q33_2 <dbl+lbl>, Q1_RP1 <chr>,
#   Q2_RP2 <chr>, Q3_RP3 <chr>, Q4_RP4 <chr>, Q5_RP5 <chr>, Q6_RP6 <chr>,
#   Q7_RP7 <chr>, Q8_RN1 <chr>, Q9_RN2 <chr>, Q10_RN3 <chr>, Q11_RN4 <chr>,
#   Q12_RN5 <chr>, Q13_RN6 <chr>, Q14_RN7 <chr>, Q15_LP1 <chr>, …

Create AgeIV

(dataset.clean %>%
  mutate(ageIV = case_when(FL_23_DO_PositiveContextualPortrayal_Protagonistis18 == 1 ~ "18", FL_23_DO_PositiveContextualPortrayal_Protagonistis40 == 1 ~ "40", FL_23_DO_NegativeContextualPortrayal_Protagonistis18 == 1 ~ "18", FL_23_DO_NegativeContextualPortrayal_Protagonistis40 == 1 ~ "40")) -> dataset.clean)
# A tibble: 24 × 64
   StartDate           EndDate             Status         Progress
   <dttm>              <dttm>              <dbl+lbl>         <dbl>
 1 2023-04-05 16:49:07 2023-04-05 16:57:20 0 [IP Address]      100
 2 2023-04-05 17:26:36 2023-04-05 17:38:47 0 [IP Address]      100
 3 2023-04-05 18:17:48 2023-04-05 18:28:02 0 [IP Address]      100
 4 2023-04-05 18:24:21 2023-04-05 18:33:43 0 [IP Address]      100
 5 2023-04-05 19:35:46 2023-04-05 19:43:20 0 [IP Address]      100
 6 2023-04-05 21:07:34 2023-04-05 21:16:06 0 [IP Address]      100
 7 2023-04-05 21:16:08 2023-04-05 21:27:24 0 [IP Address]      100
 8 2023-04-05 21:37:23 2023-04-05 21:46:35 0 [IP Address]      100
 9 2023-04-05 21:50:34 2023-04-05 22:00:45 0 [IP Address]      100
10 2023-04-06 08:45:58 2023-04-06 09:16:00 0 [IP Address]      100
# ℹ 14 more rows
# ℹ 60 more variables: Duration__in_seconds_ <dbl>, Finished <dbl+lbl>,
#   RecordedDate <dttm>, ResponseId <chr>, DistributionChannel <chr>,
#   UserLanguage <chr>, Q33_1 <dbl+lbl>, Q33_2 <dbl+lbl>, Q1_RP1 <chr>,
#   Q2_RP2 <chr>, Q3_RP3 <chr>, Q4_RP4 <chr>, Q5_RP5 <chr>, Q6_RP6 <chr>,
#   Q7_RP7 <chr>, Q8_RN1 <chr>, Q9_RN2 <chr>, Q10_RN3 <chr>, Q11_RN4 <chr>,
#   Q12_RN5 <chr>, Q13_RN6 <chr>, Q14_RN7 <chr>, Q15_LP1 <chr>, …

Study Design Table Numbers

dataset.clean %>%
  group_by(contextIV, ageIV) %>%
  summarise(mean = mean(dscore), sd = sd (dscore))
`summarise()` has grouped output by 'contextIV'. You can override using the
`.groups` argument.
# A tibble: 4 × 4
# Groups:   contextIV [2]
  contextIV ageIV   mean    sd
  <chr>     <chr>  <dbl> <dbl>
1 negative  18    0.311  0.345
2 negative  40    0.0903 0.698
3 positive  18    0.622  0.552
4 positive  40    0.265  0.496
dataset.clean %>%
  group_by(ageIV) %>%
  summarise(mean = mean(dscore), sd = sd (dscore))
# A tibble: 2 × 3
  ageIV  mean    sd
  <chr> <dbl> <dbl>
1 18    0.466 0.468
2 40    0.178 0.584
dataset.clean %>%
  group_by(contextIV) %>%
  summarise(mean = mean(dscore), sd = sd (dscore))
# A tibble: 2 × 3
  contextIV  mean    sd
  <chr>     <dbl> <dbl>
1 negative  0.201 0.537
2 positive  0.444 0.534

ANOVA

(aov_ez(id = "ResponseId", dv = "dscore", data = dataset.clean, between=c("contextIV", "ageIV")))
Converting to factor: contextIV, ageIV
Contrasts set to contr.sum for the following variables: contextIV, ageIV
Anova Table (Type 3 tests)

Response: dscore
           Effect    df  MSE    F  ges p.value
1       contextIV 1, 20 0.29 1.23 .058    .281
2           ageIV 1, 20 0.29 1.73 .079    .204
3 contextIV:ageIV 1, 20 0.29 0.10 .005    .760
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '+' 0.1 ' ' 1