A notebook made by Paul Amat, amat-design.com
Context and objectives
Is the distribution of subjects in different categories faithful to a
theoretical distribution?
Research hypothesis
Statistical hypothesis
H0:
H1:
Data preparation and exploration
Starting session
library(readr)
data <- read_csv("data.csv", show_col_types = FALSE)
Proportion tables
round(prop.table(table(data$profil)), 1) # ok jamovi
Athletic Dreamer Scientist
0.5 0.4 0.1
Parametric test
Test
test <- chisq.test(table(data$profil), correct = F) # ok in jamovi
test
Chi-squared test for given probabilities
data: table(data$profil)
X-squared = 45.28, df = 2, p-value = 1.471e-10
Conditions
Independent observations
The independence of observations is guaranteed by the recruitment
process.
More than 5 observations in each combination of theoretical
frequencies
all(test$expected > 5)
[1] TRUE
Effect size
Power analysis
Finding power
Finding N
Results and recommendations
LS0tDQp0aXRsZTogIkRpc3RyaWJ1dGlvbiBmb2xsb3dzIGEgdGhlb3JldGljYWwgZGlzdHJpYnV0aW9uIg0Kb3V0cHV0OiBodG1sX25vdGVib29rDQotLS0NCg0KQSBub3RlYm9vayBtYWRlIGJ5IFBhdWwgQW1hdCwgW2FtYXQtZGVzaWduLmNvbV0oYW1hdC1kZXNpZ24uY29tKQ0KDQojIyBDb250ZXh0IGFuZCBvYmplY3RpdmVzDQoNCj4gSXMgdGhlIGRpc3RyaWJ1dGlvbiBvZiBzdWJqZWN0cyBpbiBkaWZmZXJlbnQgY2F0ZWdvcmllcyBmYWl0aGZ1bCB0byBhIHRoZW9yZXRpY2FsIGRpc3RyaWJ1dGlvbj8NCg0KIyMjIFJlc2VhcmNoIGh5cG90aGVzaXMNCg0KIyMjIFN0YXRpc3RpY2FsIGh5cG90aGVzaXMNCg0KSDA6DQoNCkgxOg0KDQojIyBEYXRhIHByZXBhcmF0aW9uIGFuZCBleHBsb3JhdGlvbg0KDQojIyMgU3RhcnRpbmcgc2Vzc2lvbg0KDQpgYGB7cn0NCmxpYnJhcnkocmVhZHIpDQpkYXRhIDwtIHJlYWRfY3N2KCJkYXRhLmNzdiIsIHNob3dfY29sX3R5cGVzID0gRkFMU0UpDQpgYGANCg0KIyMjIFByb3BvcnRpb24gdGFibGVzDQoNCmBgYHtyfQ0Kcm91bmQocHJvcC50YWJsZSh0YWJsZShkYXRhJHByb2ZpbCkpLCAxKSAjIG9rIGphbW92aQ0KYGBgDQoNCiMjIFBhcmFtZXRyaWMgdGVzdA0KDQojIyMgVGVzdA0KDQpgYGB7cn0NCnRlc3QgPC0gY2hpc3EudGVzdCh0YWJsZShkYXRhJHByb2ZpbCksIGNvcnJlY3QgPSBGKSAjIG9rIGluIGphbW92aQ0KdGVzdA0KYGBgDQoNCiMjIyBDb25kaXRpb25zDQoNCiMjIyMgSW5kZXBlbmRlbnQgb2JzZXJ2YXRpb25zDQoNClRoZSBpbmRlcGVuZGVuY2Ugb2Ygb2JzZXJ2YXRpb25zIGlzIGd1YXJhbnRlZWQgYnkgdGhlIHJlY3J1aXRtZW50IHByb2Nlc3MuDQoNCiMjIyMgTW9yZSB0aGFuIDUgb2JzZXJ2YXRpb25zIGluIGVhY2ggY29tYmluYXRpb24gb2YgdGhlb3JldGljYWwgZnJlcXVlbmNpZXMNCg0KYGBge3J9DQphbGwodGVzdCRleHBlY3RlZCA+IDUpDQpgYGANCg0KIyMjIEVmZmVjdCBzaXplDQoNCiMjIyBQb3dlciBhbmFseXNpcw0KDQojIyMjIEZpbmRpbmcgcG93ZXINCg0KIyMjIyBGaW5kaW5nIE4NCg0KIyMgUmVzdWx0cyBhbmQgcmVjb21tZW5kYXRpb25zDQo=