disgust <- tibble::tribble(
~score, ~condition,
13L, "control",
26L, "control",
30L, "control",
23L, "control",
34L, "control",
37L, "control",
33L, "control",
34L, "control",
35L, "control",
33L, "control",
24L, "control",
43L, "control",
23L, "control",
34L, "control",
17L, "control",
38L, "control",
38L, "control",
46L, "control",
28L, "control",
30L, "control",
25L, "control",
28L, "control",
19L, "control",
32L, "control",
29L, "control",
38L, "control",
29L, "control",
28L, "control",
28L, "control",
34L, "control",
28L, "control",
38L, "control",
26L, "control",
43L, "control",
25L, "control",
24L, "control",
21L, "control",
34L, "control",
31L, "control",
21L, "control",
23L, "control",
23L, "control",
38L, "control",
16L, "control",
29L, "control",
39L, "control",
25L, "control",
31L, "control",
33L, "control",
43L, "control",
25L, "lemon",
23L, "lemon",
35L, "lemon",
14L, "lemon",
31L, "lemon",
41L, "lemon",
21L, "lemon",
22L, "lemon",
35L, "lemon",
30L, "lemon",
45L, "lemon",
30L, "lemon",
28L, "lemon",
23L, "lemon",
40L, "lemon",
27L, "lemon",
37L, "lemon",
26L, "lemon",
25L, "lemon",
30L, "lemon",
33L, "lemon",
18L, "lemon",
26L, "lemon",
26L, "lemon",
34L, "lemon",
19L, "lemon",
22L, "lemon",
22L, "lemon",
26L, "lemon",
27L, "lemon",
27L, "lemon",
38L, "lemon",
33L, "lemon",
31L, "lemon",
31L, "lemon",
23L, "lemon",
27L, "lemon",
33L, "lemon",
30L, "lemon",
30L, "lemon",
36L, "lemon",
43L, "lemon",
26L, "lemon",
32L, "lemon",
26L, "lemon",
26L, "lemon",
22L, "lemon",
24L, "lemon",
28L, "lemon",
29L, "lemon",
35L, "sulfur",
24L, "sulfur",
39L, "sulfur",
34L, "sulfur",
35L, "sulfur",
44L, "sulfur",
23L, "sulfur",
36L, "sulfur",
28L, "sulfur",
23L, "sulfur",
30L, "sulfur",
36L, "sulfur",
40L, "sulfur",
30L, "sulfur",
34L, "sulfur",
34L, "sulfur",
32L, "sulfur",
45L, "sulfur",
40L, "sulfur",
28L, "sulfur",
33L, "sulfur",
42L, "sulfur",
30L, "sulfur",
32L, "sulfur",
26L, "sulfur",
29L, "sulfur",
31L, "sulfur",
35L, "sulfur",
24L, "sulfur",
32L, "sulfur",
31L, "sulfur",
28L, "sulfur",
32L, "sulfur",
39L, "sulfur",
20L, "sulfur",
33L, "sulfur",
30L, "sulfur",
37L, "sulfur",
35L, "sulfur",
32L, "sulfur",
27L, "sulfur",
38L, "sulfur",
21L, "sulfur",
41L, "sulfur",
27L, "sulfur",
27L, "sulfur",
43L, "sulfur",
25L, "sulfur",
24L, "sulfur",
23L, "sulfur"
)
disgust$condition <- factor(disgust$condition)
disgust <- as.data.frame(disgust)
save(disgust, file = "data/disgust.rdata")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.