ABCDEFGHIJKLMNOPQRSTUVWXYZAAABACADAEAFAGAHAIAJAKALAMANAOAPAQARASATAUAVAWAXAYAZ
1
unique.idstudy.idstudy.slatestudy.namestudy.analysisstudy.varsstudy.vars.labelsstudy.cases.includestudy.sites.includestudy.global.includestudy.primary.includestudy.secondary.includestudy.figure2.includestudy.table1.includestudy.table1.weird.splitstat.varsstat.typestat.teststat.paramsstat.ncpstat.dfstat.p.valueorig.sample.nationori.sample.weird
ori.study.figure2.include
orig.stat.type
orig.test.alternative
orig.test.sample
orig.stat.df1
orig.stat.df2
orig.stat.n1
orig.stat.n2
orig.stat.N
orig.stat.estimate
orig.stat.estimate1
orig.stat.estimate2
orig.stat.ncp
orig.stat.ncp.ciL
orig.stat.ncp.ciU
orig.stat.p.value
orig.ES.dorig.ES.d.ciLorig.ES.d.ciUorig.ES.rorig.ES.r.ciLorig.ES.r.ciUorig.ES.cohensQ
orig.ES.cohensQ.ciL
orig.ES.cohensQ.ciU
commentsstudy.descriptioncohensQ
2
111HuangHuang.1list(High=c('huan1.1_Y1','huan1.1_R0'), Low=c('huan2.1_Y1','huan2.1_R0'))list(Condition=c('High','Low'))list(each=c('Condition','X > 0'))list(c('all'))101111varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS & Hong Kong, China100Direction & SES (Huang et al., 2014)
3
211HuangHuang.2list(High=c('huan1.1_Y1','huan1.1_R0','homewealth'), Low=c('huan2.1_Y1','huan2.1_R0', 'homewealth'))list(Condition=c('High','Low'), HomeWealth = c('homewealth','homewealth'))list(each=rbind(c('Condition','X > 0'),c('HomeWealth','X == 1')))list(c('all'))110000varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Direction & SES (Huang et al., 2014)
4
311HuangHuang.3list(High=c('huan1.1_Y1','huan1.1_R0'), Low=c('huan2.1_Y1','huan2.1_R0'))list(Condition=c('High','Low'))list(each=c('Condition','X > 0'))list(c('Source.Global=="ouhk" | Source.Global == "hkust" '))101000varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent784040803.691.645.72<.0010.830.371.280.390.180.54Direction & SES (Huang et al., 2014)
5
411HuangHuang.4list(High=c('huan1.1_Y1','huan1.1_R0'), Low=c('huan2.1_Y1','huan2.1_R0'))list(Condition=c('High','Low'))list(each=c('Condition','X > 0'))list(c('Country=="USA" '))101000varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueHong Kong, China01ttwo.sidedindependent985050100-2.95-4.95-0.940.00-0.59-0.99-0.19-0.29-0.45-0.09Direction & SES (Huang et al., 2014)
6
511HuangHuang.5list(High=c('huan1.1_Y1','huan1.1_R0','homewealth'), Low=c('huan2.1_Y1','huan2.1_R0', 'homewealth'))list(Condition=c('High','Low'), HomeWealth = c('homewealth','homewealth'))list(each=rbind(c('Condition','X > 0'),c('HomeWealth','X == 1')))list(c('Tablet=="Tablets" '))101000varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Direction & SES (Huang et al., 2014)
7
611HuangHuang.6list(High=c('huan1.1_Y1','huan1.1_R0','homewealth'), Low=c('huan2.1_Y1','huan2.1_R0', 'homewealth'))list(Condition=c('High','Low'), HomeWealth = c('homewealth','homewealth'))list(each=rbind(c('Condition','X > 0'),c('HomeWealth','X == 2')))list(c('Tablet=="Tablets" '))101000varfun.Huang.1tt.test(x = High, y = Low, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueHong Kong, China00Direction & SES (Huang et al., 2014)
8
721KayKay.1list(Order=c('kay1.4','kay1.5','kay1.6'), DisOrder=c('kay2.4','kay2.5','kay2.6'))list(Condition=c('Order','DisOrder'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Kay.1tt.test(x = Order, y = DisOrder, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent653334672.000.003.980.050.490.000.970.240.000.44Structure & Goal Pursuit (Kay et al., 2014)
9
831AlterAlter.1list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('all'))101110varfun.Alter.1tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Disfluency (Alter et al., 2007)
10
931AlterAlter.2list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Alter.2tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Disfluency (Alter et al., 2007)
11
1031AlterAlter.3list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('Language=="English"&Setting=="In a lab" '))110000varfun.Alter.1tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent392021412.01-0.014.010.050.630.001.250.310.000.54Incidental Disfluency (Alter et al., 2007)
12
1131AlterAlter.4list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('Language=="English"&Setting=="In a lab" '))101000varfun.Alter.2tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Disfluency (Alter et al., 2007)
13
1231AlterAlter.5list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('all'))100000varfun.Alter.3tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Disfluency (Alter et al., 2007)
14
1331AlterAlter.6list(Fluent=c('alt1.3','alt1.4','alt1.5','alt1.6','alt1.7','alt1.8'), DisFluent=c('alt2.3','alt2.4','alt2.5','alt2.6','alt2.7','alt2.8'))list(Condition=c('Fluent','DisFluent'))list(each=c('Condition','X > 0'))list(c('all'))100000varfun.Alter.4tt.test(x = DisFluent, y = Fluent, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Disfluency (Alter et al., 2007)
15
1441GrahamGraham.1list(Binding=c('grah1.8','grah1.9','grah1.10','grah1.11','grah1.12','grah1.13','grah1.14','grah1.15','grah1.16'),Politics=c('politics'))list(Condition=c('Binding','Politics'),Politics=c('politics'))list(sep=rbind(c('Condition','X > 0'), c('Politics','between(X,1,7)')))list(c('all'))110110varfun.Graham.1Z.fcor_test_fisherZ(r1=matrix(c(Binding,Politics),ncol=2), r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=TRUE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 11t.rtwo.sidedpaired1207120912090.250.258.976.9810.960.520.400.630.250.200.30Moral Foundations (Graham et al., 2009)
16
1541GrahamGraham.2list(Individual=c('grah1.2','grah1.3','grah1.4','grah1.5','grah1.6','grah1.7'),Politics=c('politics'))list(Condition=c('Individual','Politics'),Politics=c('politics'))list(sep=rbind(c('Condition','X > 0'), c('Politics','between(X,1,7)')))list(c('all'))101000varfun.Graham.2Z.fcor_test_fisherZ(r1=matrix(c(Individual,Politics),ncol=2), r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=TRUE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 10t.rtwo.sidedpaired120712091209-0.21-0.21-7.46-9.44-5.48-0.43-0.55-0.31-0.21-0.26-0.16Moral Foundations (Graham et al., 2009)
17
1651RottenstreichRottenstreich.1list(Low=c('rott2.1'), Certain=c('rott1.1'))list(Condition=c('Low','Certain'), Response=c('MovieStar','Money'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Rottenstreich.1ORfisher.exact(Condition,Response)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11X2NA12020404.914.910.0017.440.030.740.001.740.350.000.66Symmetric exact CI based on X2 failed for lower bounds Affect & Risk (Rottenstreich & Hsee, 2001)
18
1761BauerBauer.1list(Consumer=c('bau1.1','baudv.4'), Individual=c('bau2.1','baudv.4'))list(Condition=c('Consumer','Individual'), Trust=c('baudv.4','baudv.4'))list(each=rbind(c('Condition','X > 0'),c('Trust', 'X < 8')))list(c('all'))110110varfun.Bauer.1tt.test(y = Consumer, x = Individual, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk11ttwo.sidedindependent763938773.861.795.900.000.870.411.340.400.200.56Priming Consumerism (Bauer et al., 2012)
19
1861BauerBauer.2list(Consumer=c('bau1.1','baudv.2'), Individual=c('bau2.1','baudv.2'))list(Condition=c('Consumer','Individual'), Responsible=c('baudv.2','baudv.2'))list(each=rbind(c('Condition','X > 0'),c('Responsible', 'X < 8')))list(c('all'))101000varfun.Bauer.1tt.test(y = Consumer, x = Individual, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk10Priming Consumerism (Bauer et al., 2012)
20
1961BauerBauer.3list(Consumer=c('bau1.1','baudv.3'), Individual=c('bau2.1','baudv.3'))list(Condition=c('Consumer','Individual'), Obligation=c('baudv.3','baudv.3'))list(each=rbind(c('Condition','X > 0'),c('Obligation', 'X < 8')))list(c('all'))101000varfun.Bauer.1tt.test(y = Consumer, x = Individual, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk10Priming Consumerism (Bauer et al., 2012)
21
2061BauerBauer.4list(Consumer=c('bau1.1','baudv.5'), Individual=c('bau2.1','baudv.5'))list(Condition=c('Consumer','Individual'), Partner=c('baudv.5','baudv.5'))list(each=rbind(c('Condition','X > 0'),c('Partner', 'X < 8')))list(c('all'))101000varfun.Bauer.1tt.test(y = Consumer, x = Individual, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk10Priming Consumerism (Bauer et al., 2012)
22
2161BauerBauer.5list(Consumer=c('bau1.1','baudv.6'), Individual=c('bau2.1','baudv.6'))list(Condition=c('Consumer','Individual'), UseLess=c('baudv.6','baudv.6'))list(each=rbind(c('Condition','X > 0'),c('UseLess', 'X < 8')))list(c('all'))101000varfun.Bauer.1tt.test(y = Consumer, x = Individual, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk10Priming Consumerism (Bauer et al., 2012)
23
2271MiyamotoMiyamoto.1list(CapitalCon=c('miya2.4','miya2.7'),CapitalPro=c('miya1.4','miya1.7'))list(Condition=c('CapitalCon','CapitalPro'))list(each=c('Condition','X > 0'))list(c('all'))110111varfun.Miyamoto.1lm.tsummary(lm(Attitude ~ Constraint + Condition))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[3,'t value'] stat.test$df[2]stat.test$coefficients[3,'Pr(>|t|)'] US11ttwo.sidedindependent271415296.663.999.260.002.471.483.440.790.610.87
Correspondence Bias (Miyamoto & Kitayama, 2002)
24
2371MiyamotoMiyamoto.2list(CapitalCon=c('miya2.5','miya2.7'),CapitalPro=c('miya1.5','miya1.7'))list(Condition=c('CapitalCon','CapitalPro'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Miyamoto.1lm.tsummary(lm(Attitude ~ Constraint + Condition))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[3,'t value'] stat.test$df[2]stat.test$coefficients[3,'Pr(>|t|)'] US & Japan10
Correspondence Bias (Miyamoto & Kitayama, 2002)
25
2471MiyamotoMiyamoto.3list(CapitalCon=c('miya2.4','miya2.7','miya2.6'),CapitalPro=c('miya1.4','miya1.7','miya1.6'))list(Condition=c('CapitalCon','CapitalPro'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Miyamoto.2lm.tsummary(lm(Attitude ~ Constraint + Moderator * Condition))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[5,'t value'] stat.test$df[2]stat.test$coefficients[5,'Pr(>|t|)'] Japan01ttwo.sidedindependent231213251.84-0.213.850.070.74-0.081.540.36-0.040.63the original effet size refer to japanese participants only
Correspondence Bias (Miyamoto & Kitayama, 2002)
26
2571MiyamotoMiyamoto.4list(CapitalCon=c('miya2.4','miya2.7','miya2.8'),CapitalPro=c('miya1.4','miya1.7','miya1.8'))list(Condition=c('CapitalCon','CapitalPro'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Miyamoto.2lm.tsummary(lm(Attitude ~ Constraint + Moderator * Condition))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[5,'t value'] stat.test$df[2]stat.test$coefficients[5,'Pr(>|t|)'] US & Japan10
Correspondence Bias (Miyamoto & Kitayama, 2002)
27
2681InbarInbar.1alist(SameKiss=c('inba1.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1,r2=r2,n1=N[1],n2=N[2], conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11Z.ftwo.sidedindependent21212222440.720.20.030.700.051.36Disgust & Homophobia (Inbar et al., 2009)1
28
2781InbarInbar.1blist(SameKiss=c('inba1.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1, r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
29
2881InbarInbar.1clist(SameKiss=c('inba1.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.3','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r2, r2=NULL, n1=N[2], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
30
2981InbarInbar.2alist(SameKiss=c('inba1.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1,r2=r2,n1=N[1],n2=N[2], conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)1
31
3081InbarInbar.2blist(SameKiss=c('inba1.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1, r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
32
3181InbarInbar.2clist(SameKiss=c('inba1.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.4','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r2, r2=NULL, n1=N[2], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
33
3281InbarInbar.3alist(SameKiss=c('inba1.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1,r2=r2,n1=N[1],n2=N[2], conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)1
34
3381InbarInbar.3blist(SameKiss=c('inba1.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r1, r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
35
3481InbarInbar.3clist(SameKiss=c('inba1.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'), DiffKiss=c('inba2.5','disg1.11','disg1.12','disg2.10','disg2.12','disg2.13'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.1Z.fcor_test_fisherZ(r1=r2, r2=NULL, n1=N[2], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
36
3581InbarInbar.4list(SameKiss=c('inba1.3'), DiffKiss=c('inba2.3'))list(Condition=c('SameKiss','DiffKiss'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Inbar.2tt.test(x = SameKiss, y = DiffKiss, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Disgust & Homophobia (Inbar et al., 2009)
37
3691CritcherCritcher.1list(P97=c('crit1.1'), P17=c('crit2.1'))list(Condition=c('P97','P17'))list(each=c('Condition','between(X,0,100)'))list(c('all'))110110varfun.Critcher.1tt.test(x = P97, y = P17, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent197.51001002002.120.154.090.030.300.020.580.150.010.28Incidental Anchors (Critcher & Gilovich, 2008)
38
3791CritcherCritcher.2list(P97=c('crit1.1'), P17=c('crit2.1'))list(Condition=c('P97','P17'))list(each=c('Condition','between(X,0,100)'))list(c('Pencil=="Yes, participants completed the Critcher task on pencil and paper" '))101000varfun.Critcher.1tt.test(x = P97, y = P17, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Incidental Anchors (Critcher & Gilovich, 2008)
39
38101vanLangevanLange.1
list(SVO=c('van.p1.2_1','van.p1.2_2','van.p1.2_3','van.p1.2_4','van.p1.2_5','van.p1.2_6'), Siblings=c('van.p2.1_1_TEXT','van.p2.1_2_TEXT'))
list(Condition=c('SVO','Siblings'), Siblings=c('as.numeric(van.p2.1_1_TEXT)','as.numeric(van.p2.1_2_TEXT)'))list(sep=rbind(c('Condition','X >= 0'),c('Siblings','between(X,0,20)')))list(c('all'))110110varfun.vanLange.1Z.fcor_test_fisherZ(r1=matrix(c(SVO.index,Siblings),ncol=2), r2=NULL, n1=N[1], n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueNetherlands11ftwo.sidedindependent15353072295364.821.0029.240.010.190.090.470.090.040.23orig.stat.n1 is best estimate given available info | Symmetric exact CI based on f failed for lower bounds Social Value Orientation (Van Lange et al., 1997)
40
39111HauserHauser.1list(SideEffect=c('haus1.1','haus1.1t_1'),GreaterGood=c('haus2.1','haus2.1t_1'))list(Condition=c('SideEffect','GreaterGood'), Timing=c('haus1.1t_1','haus2.1t_1'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Timing', 'X > 4')))list(c('all'))110110varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 11X2NAindependent1264626461615.961462.221777.380.002.502.222.860.780.740.82Trolley Dilemma 1 (Hauser et al., 2007)
41
40111HauserHauser.2list(SideEffect=c('haus1.1','haus1.2','haus1.1t_1'),GreaterGood=c('haus2.1','haus2.2','haus2.1t_1'))list(Condition=c('SideEffect','GreaterGood'), Experience=c('haus1.2','haus2.2'), Timing=c('haus1.1t_1','haus2.1t_1'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Experience','X==1'),c('Timing > 4')))list(c('all'))101000varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 10Trolley Dilemma 1 (Hauser et al., 2007)
42
41111HauserHauser.3list(SideEffect=c('haus1.1','haus1.2','haus1.1t_1'),GreaterGood=c('haus2.1','haus2.2','haus2.1t_1'))list(Condition=c('SideEffect','GreaterGood'), Experience=c('haus1.2','haus2.2'), Timing=c('haus1.1t_1','haus2.1t_1'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Experience','X==2'),c('Timing > 4')))list(c('all'))101000varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 10Trolley Dilemma 1 (Hauser et al., 2007)
43
42121AndersonAnderson.1list(Low=c('and1.3_1', 'and1.3_2', 'and1.3_3', 'and1.3_4', 'and1.3_5', 'and1.4_1', 'and1.4_2', 'and1.4_3', 'and1.4_4', 'and1.4_5', 'and1.4_6', 'and1.4_7', 'and1.4_8', 'and1.4_9', 'and1.4_10', 'and1.4_11', 'and1.4_12', 'and1.4_13', 'and1.4_14', 'and1.4_15', 'and1.4_16', 'and1.4_17', 'and1.4_18', 'and1.4_19', 'and1.4_20'), High=c('and2.3_1', 'and2.3_2', 'and2.3_3', 'and2.3_4', 'and2.3_5', 'and2.4_1', 'and2.4_2', 'and2.4_3', 'and2.4_4', 'and2.4_5', 'and2.4_6', 'and2.4_7', 'and2.4_8', 'and2.4_9', 'and2.4_10', 'and2.4_11', 'and2.4_12', 'and2.4_13', 'and2.4_14', 'and2.4_15', 'and2.4_16', 'and2.4_17', 'and2.4_18', 'and2.4_19', 'and2.4_20'))list(Condition=c('Low','High'),Response=c('Positive','Negative'))list(each=c('Condition', 'between(X,0,100)'))list(c('all'))110110varfun.Anderson.1tt.test(SWB ~ Condition, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueMTurk11ttwo.sidedindependent18158581163.051.065.030.000.570.200.930.270.100.43SMS & Well-Being (Anderson et al., 2012)
44
43131RossRoss.1list(You=c('ross.s1.2'),Peers=c('ross.s1.1_1_TEXT'))list(Condition=c('You','Peers'), Peers=c('ross.s1.1_1_TEXT'), Response=c('Sign','Refuse'))list(sep=rbind(c('Condition','X >= 0'),c('Peers','between(X,0,100)')))list(c('all'))110110varfun.Ross.1tt.test(Peers ~ You, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=FALSE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=TRUE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ftwo.sidedindependent17853278017.701.0093.950.000.990.242.290.430.110.73Symmetric exact CI based on f failed for lower bounds False Consensus 1 (Ross et al., 1977)
45
44142RossRoss.2list(You=c('ross.s2.2'),Peers=c('ross.s2.1_1_TEXT'))list(Condition=c('You','Peers'), Peers=c('ross.s2.1_1_TEXT'), Response=c('Pay','Court'))list(sep=rbind(c('Condition','X >= 0'),c('Peers','between(X,0,100)')))list(c('all'))110110varfun.Ross.2tt.test(Peers ~ You, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=FALSE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=TRUE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ftwo.sidedindependent17837438012.801.0069.330.000.800.221.870.370.110.68Symmetric exact CI based on f failed for lower bounds False Consensus 2 (Ross et al., 1977)
46
45152GiessnerGiessner.1
list(Long=c('geis1.1','geis.dv_1','geis.dv_2','geis.dv_3','geis.dv_4','geis.dv_5'), Short=c('geis2.1','geis.dv_1','geis.dv_2','geis.dv_3','geis.dv_4','geis.dv_5'))
list(Condition=c('Long','Short'))list(each=c('Condition','X!=-99'))list(c('all'))110110varfun.Giessner.1tt.test(x = Long, y = Short, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueNetherlands11ttwo.sidedindependent623232642.200.194.190.030.550.051.050.270.020.47Position & Power (Giessner & Schubert, 2007)
47
46162TverskyTversky.1list(Cheap=c('tver2.1'),Expensive=c('tver1.1'))list(Condition=c('Cheap','Expensive'), Response=c('Yes','No'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Tversky.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ORtwo.sidedindependent93881817.153.6613.960.001.080.711.450.480.340.59Framing (Tversky & Kahneman, 1981)
48
47172HauserHauser.4list(SideEffect=c('haus4.1','haus4.1t_3'),GreaterGood=c('haus3.1','haus3.1t_3'))list(Condition=c('SideEffect','GreaterGood'), Timing=c('haus4.1t_3','haus3.1t_3'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Timing > 4')))list(c('all'))110110varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 11X2NAindependent12612261272.3542.85109.530.000.340.260.420.170.130.20Trolley Dilemma 2 (Hauser et al., 2007)
49
48172HauserHauser.5list(SideEffect=c('haus4.1','haus4.2','haus4.1t_3'),GreaterGood=c('haus3.1','haus3.2','haus3.1t_3'))list(Condition=c('SideEffect','GreaterGood'), Experience=c('haus4.2','haus3.2'), Timing=c('haus4.1t_3','haus3.1t_3'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Experience','X==1'),c('Timing > 4')))list(c('all'))101000varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 10Trolley Dilemma 2 (Hauser et al., 2007)
50
49172HauserHauser.6list(SideEffect=c('haus4.1','haus4.2','haus4.1t_3'),GreaterGood=c('haus3.1','haus3.2','haus3.1t_3'))list(Condition=c('SideEffect','GreaterGood'), Experience=c('haus4.2','haus3.2'), Timing=c('haus4.1t_3','haus3.1t_3'), Response=c('Yes','No'))list(each=rbind(c('Condition','X >= 0'),c('Experience','X==2'),c('Timing > 4')))list(c('all'))101000varfun.Hauser.1ORfisher.exact(table(Condition,Response))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueVarious (mainly US, GB and Canada). 10Trolley Dilemma 2 (Hauser et al., 2007)
51
50182RisenRisen.1list(Unprepared=c('rise1.3'),Prepared=c('rise2.3'))list(Condition=c('Unprepared','Prepared'))list(each=c('Condition','X > 0'))list(c('SubjectPool == "Yes" '))110000varfun.Risen.1tt.test(x = Unprepared, y = Prepared, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10ttwo.sidedindependent11660601202.150.174.120.030.390.030.750.190.020.35Tempting Fate (Risen & Gilovich, 2008)
52
51182RisenRisen.2list(Unprepared=c('rise1.3','sex'),Prepared=c('rise2.3','sex'))list(Condition=c('Unprepared','Prepared'), Sex=c('sex'))list(each=rbind(c('Condition','X > 0'),c('Sex','X < 3')))list(c('SubjectPool == "Yes" '))101000varfun.Risen.2fanova(lm(Likelihood ~ Condition*Gender))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test[3,'F value']c(stat.test[3,'Df'], stat.test[4,'Df'])stat.test[3,'Pr(>F)']US10Tempting Fate (Risen & Gilovich, 2008)
53
52182RisenRisen.3list(Unprepared=c('rise1.3'),Prepared=c('rise2.3'))list(Condition=c('Unprepared','Prepared'))list(each=c('Condition','X > 0'))list(c('all'))101110varfun.Risen.1tt.test(x = Unprepared, y = Prepared, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent11660601202.150.174.120.030.390.030.750.190.020.35Tempting Fate (Risen & Gilovich, 2008)
54
53192SavaniSavani.1alist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('SubjectPool == "Yes" '))101000varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[3,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[3,"Pr(>|z|)"]US & India100lm.ORtwo.sidedindependent10151521030.880.341.430.480.490.190.790.240.040.41Actions are Choices (Savani et al., 2010)
55
54192SavaniSavani.1blist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('SubjectPool == "Yes" '))101000varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[4,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[4,"Pr(>|z|)"]US & India100Actions are Choices (Savani et al., 2010)
56
55192SavaniSavani.2alist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('SubjectPool == "Yes" & Country == "India" '))110000varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[3,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[3,"Pr(>|z|)"]US11ttwo.sidedindependent884545900.39-1.572.350.650.08-0.330.500.04-0.170.24Actions are Choices (Savani et al., 2010)
57
56192SavaniSavani.2blist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('SubjectPool == "Yes" & Country == "India" '))110000varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[4,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[4,"Pr(>|z|)"]India01ttwo.sidedindependent1266464128-3.69-5.70-1.670.00-0.65-1.01-0.30-0.31-0.45-0.15Actions are Choices (Savani et al., 2010)
58
57192SavaniSavani.3alist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('all'))101111varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[3,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[3,"Pr(>|z|)"]US & India100Actions are Choices (Savani et al., 2010)
59
58192SavaniSavani.3blist(Interpersonal=c('sava1.4', 'sava1.5', 'sava1.9', 'sava1.10', 'sava1.15', 'sava1.16' , 'sava1.21', 'sava1.22', 'sava1.27', 'sava1.28', 'sava1.33', 'sava1.34', 'sava1.38', 'sava1.39', 'sava1.43', 'sava1.44'),Personal=c('sava2.4', 'sava2.5', 'sava2.9', 'sava2.10', 'sava2.15', 'sava2.16' , 'sava2.21', 'sava2.22', 'sava2.27', 'sava2.28', 'sava2.33', 'sava2.34', 'sava2.38', 'sava2.39', 'sava2.43', 'sava2.44'))list(Condition=c('Interpersonal','Personal'),Response=c('No Choice','Choice'),Importance=c('Importance'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Savani.1lm.ORsummary(lme4::glmer(Response ~ Importance*Condition + (1|uID/trialID), family = binomial('logit'), nAGQ=0))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[4,"Estimate"]stat.test$devcomp$dims['nmp']stat.test$coefficients[4,"Pr(>|z|)"]US & India100Actions are Choices (Savani et al., 2010)
60
59202NorenzayanNorenzayan.1list(Belong=c('nore1.1', 'nore1.2', 'nore1.3', 'nore1.4', 'nore1.5', 'nore1.6', 'nore1.7', 'nore1.8', 'nore1.9', 'nore1.10','nore1.11','nore1.12','nore1.13','nore1.14','nore1.15','nore1.16','nore1.17','nore1.18','nore1.19','nore1.20'), Similar=c('nore2.1', 'nore2.2', 'nore2.3', 'nore2.4', 'nore2.5', 'nore2.6', 'nore2.7', 'nore2.8', 'nore2.9', 'nore2.10','nore2.11','nore2.12','nore2.13','nore2.14','nore2.15','nore2.16','nore2.17','nore2.18','nore2.19','nore2.20'))list(Condition=c('Belong','Similar'))list(each=c('Condition','X > 0'))list(c('all'))110111varfun.Norenzayan.1tt.test(x = Belong, y = Similar, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ORindependent170038010801.001.000.761.310.00-0.150.150.00-0.070.07Intuitive Reasoning (Norenzayan et al., 2002)
61
60202NorenzayanNorenzayan.2list(Belong=c('nore1.1', 'nore1.2', 'nore1.3', 'nore1.4', 'nore1.5', 'nore1.6', 'nore1.7', 'nore1.8', 'nore1.9', 'nore1.10','nore1.11','nore1.12','nore1.13','nore1.14','nore1.15','nore1.16','nore1.17','nore1.18','nore1.19','nore1.20'), Similar=c('nore2.1', 'nore2.2', 'nore2.3', 'nore2.4', 'nore2.5', 'nore2.6', 'nore2.7', 'nore2.8', 'nore2.9', 'nore2.10','nore2.11','nore2.12','nore2.13','nore2.14','nore2.15','nore2.16','nore2.17','nore2.18','nore2.19','nore2.20'))list(Condition=c('Belong','Similar'), Order=c('noreBEFOREgati','noreAFTERgati'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Norenzayan.2lm.tsummary(lm(Response ~ Condition * Order))list(conf.level=.95, var.equal=NA, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[4,3]stat.test$fstatistic[['numdf']] + stat.test$fstatistic[['dendf']]stat.test$coefficients[4,4]East Asia01ORindependent172038011003.353.352.564.370.670.520.810.300.240.36Intuitive Reasoning (Norenzayan et al., 2002)
62
61212HseeHsee.1list(Scarf=c('hsee1.1'),Coat=c('hsee2.1'))list(Condition=c('Scarf','Coat'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Hsee.1tt.test(x = Scarf, y = Coat, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent824142833.131.105.140.000.690.241.130.330.120.50Less is Better (Hsee, 1998)
63
62222GrayGray.1list(adultHbaby=c('gray1.2'), babyHadult=c('gray2.2'))list(Condition=c('adultHbaby','babyHadult'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Gray.1tt.test(x = adultHbaby, y = babyHadult, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent683435693.321.275.350.000.800.311.290.380.150.55Moral Typecasting (Gray & Wegner, 2009)
64
63222GrayGray.2list(adultHbaby=c('gray1.3'), babyHadult=c('gray2.3'))list(Condition=c('adultHbaby','babyHadult'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Gray.1tt.test(x = adultHbaby, y = babyHadult, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Moral Typecasting (Gray & Wegner, 2009)
65
64222GrayGray.3list(adultHbaby=c('gray1.4'), babyHadult=c('gray2.4'))list(Condition=c('adultHbaby','babyHadult'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Gray.1tt.test(x = adultHbaby, y = babyHadult, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Moral Typecasting (Gray & Wegner, 2009)
66
65232ZhongZhong.1list(Ethical=c('nCopied.zhon2','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'), Unethical=c('nCopied.zhon1','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'))list(Condition=c('Ethical','Unethical'))list(each=c('Condition','X >= 0'))list(c('all'))110110varfun.Zhong.1tt.test(x = Ethical, y = Unethical, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS & Canada11ftwo.sidedindependent1251413276.991.0040.140.011.020.392.440.450.190.77assuming random assignment and rounding to get the total N. | Symmetric exact CI based on f failed for lower bounds Moral Cleansing (Zhong & Liljenquist, 2006)
67
66232ZhongZhong.2list(Ethical=c('nCopied.zhon2','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'), Unethical=c('nCopied.zhon1','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'))list(Condition=c('Ethical','Unethical'),Product=c('Clean','Other'))list(each=c('Condition','X >= 0'))list(c('all'))101000varfun.Zhong.2lm.tsummary(lmerTest::lmer(Response ~ Condition * Product + (1|uID)))list(conf.level=.95, var.equal=NA, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[4,4]stat.test$coefficients[4,3]stat.test$coefficients[4,5]US & Canada10Moral Cleansing (Zhong & Liljenquist, 2006)
68
67232ZhongZhong.3list(Ethical=c('nCopied.zhon2','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'), Unethical=c('nCopied.zhon1','zhon.dv.1_1', 'zhon.dv.1_2', 'zhon.dv.1_3', 'zhon.dv.1_4', 'zhon.dv.1_5', 'zhon.dv.1_6', 'zhon.dv.1_7', 'zhon.dv.1_8', 'zhon.dv.1_9', 'zhon.dv.1_10'))list(Condition=c('Ethical','Unethical'))list(each=c('Condition','X >= 0'))list(c('all'))101000varfun.Zhong.3tt.test(x = Ethical, y = Unethical, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS & Canada10Moral Cleansing (Zhong & Liljenquist, 2006)
69
68242SchwarzSchwarz.1alist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Schwarz.1Z.fcor_test_fisherZ(r1=r1,r2=r2,n1=N[1],n2=N[2], conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany11Z.ftwo.sidedindependent484850501000.670.320.000.480.070.88Assimilation & Contrast (Schwarz et al., 1991)1
70
69242SchwarzSchwarz.1blist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Schwarz.1Z.fcor_test_fisherZ(r1=r1,r2=NULL,n1=N[1],n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany10Z.ftwo.sidedindependent4850500.670.671.811.102.660.670.480.800.810.521.10Assimilation & Contrast (Schwarz et al., 1991)
71
70242SchwarzSchwarz.1clist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Schwarz.1Z.fcor_test_fisherZ(r1=r2,r2=NULL,n1=N[2],n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany10Z.ftwo.sidedindependent4850500.320.320.680.091.320.320.050.550.330.050.62Assimilation & Contrast (Schwarz et al., 1991)
72
71242SchwarzSchwarz.2alist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))100000varfun.Schwarz.2Z.fcor_test_fisherZ(r1=r1,r2=r2,n1=N[1],n2=N[2], conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany10Assimilation & Contrast (Schwarz et al., 1991)1
73
72242SchwarzSchwarz.2blist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))100000varfun.Schwarz.2Z.fcor_test_fisherZ(r1=r1,r2=NULL,n1=N[1],n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany10Assimilation & Contrast (Schwarz et al., 1991)
74
73242SchwarzSchwarz.2clist(GlobalFirst=c('schw1.1','schw1.2'),SpecificFirst=c('schw2.1','schw2.2'))list(Condition=c('GlobalFirst','SpecificFirst'))list(each=c('Condition','X > 0'))list(c('all'))100000varfun.Schwarz.2Z.fcor_test_fisherZ(r1=r2,r2=NULL,n1=N[2],n2=NULL, conf.level=stat.params$conf.level, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueGermany10Assimilation & Contrast (Schwarz et al., 1991)
75
74252ShafirShafir.1list(Award=c('shaf1.1'), Deny=c('shaf2.1'))list(Condition=c('Award','Deny'), Response=c('ParentA','ParentB'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Shafir.1Zz.test(x = ParentB, pi = .5, N = sum(N, na.rm=TRUE), proportion = TRUE, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='greater',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11Ztwo.sidedindependent85851702.480.524.440.010.380.080.700.190.040.33Choosing or Rejecting (Shafir, 1993)
76
75262ZavalZaval.1list(Heat=c('zav.dv.2','zav.include.strict','zav.condition'),Cold=c('zav.dv.2','zav.include.strict','zav.condition'))list(Condition=c('Heat','Cold'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Zaval.1tt.test(x = Heat, y = Cold, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Priming Warmth (Zaval et al., 2014)
77
76262ZavalZaval.2list(Heat=c('zav.dv.2','zav.include.strict','zav.condition'),Cold=c('zav.dv.2','zav.include.strict','zav.condition'))list(Condition=c('Heat','Cold'))list(each=c('Condition','X > 0'))list(c('Language=="English" '))101000varfun.Zaval.1tt.test(x = Heat, y = Cold, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Priming Warmth (Zaval et al., 2014)
78
77262ZavalZaval.3list(Heat=c('zav.dv.3','zav.include.strict','zav.condition'),Cold=c('zav.dv.3','zav.include.strict','zav.condition'))list(Condition=c('Heat','Cold'))list(each=c('Condition','X > 0'))list(c('all'))101110varfun.Zaval.1tt.test(x = Heat, y = Cold, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11ttwo.sidedindependent19196961922.150.184.120.030.310.030.590.150.010.29Priming Warmth (Zaval et al., 2014)
79
78262ZavalZaval.4list(Heat=c('zav.dv.3','zav.include.strict','zav.condition'), Cold=c('zav.dv.3','zav.include.strict','zav.condition'))list(Condition=c('Heat','Cold'))list(each=c('Condition','X > 0'))list(c('Language=="English" '))110000varfun.Zaval.1tt.test(x = Heat, y = Cold, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Priming Warmth (Zaval et al., 2014)
80
79272KnobeKnobe.1list(Help=c('knob1.3'),Harm=c('knob2.3'))list(Condition=c('Help','Harm'))list(each=c('Condition','X > 0'))list(c('all'))110110varfun.Knobe.1tt.test(x = Harm, y = Help, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS11X2NAindependent17827.2010.6051.490.001.450.792.770.590.370.81Intentional Side-Effects (Knobe, 2003)
81
80272KnobeKnobe.2list(Praise=c('knob1.4'),Blame=c('knob2.4'))list(Condition=c('Praise','Blame'))list(each=c('Condition','X > 0'))list(c('all'))101000varfun.Knobe.2tt.test(x = Blame, y = Praise, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueUS10Intentional Side-Effects (Knobe, 2003)
82
81282GatiGati.1alist(SimilarityA=c('gati1s.2','gati1s.3','gati1s.5','gati1s.11','gati1s.12','gati1s.14','gati1s.16','gati1s.17','gati1s.18','gati1s.19','gati1s.22','gati1s.4','gati1s.6','gati1s.7','gati1s.8','gati1s.9','gati1s.10','gati1s.13','gati1s.15','gati1s.20','gati1s.21'),SimilarityB=c('gati2s.2','gati2s.3','gati2s.5','gati2s.11','gati2s.12','gati2s.14','gati2s.16','gati2s.17','gati2s.18','gati2s.19','gati2s.22','gati2s.4','gati2s.6','gati2s.7','gati2s.8','gati2s.9','gati2s.10','gati2s.13','gati2s.15','gati2s.20','gati2s.21'))list(CounterBalance=c('SimilarityA','SimilarityB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.1lm.tsummary(lmerTest::lmer(DV ~ Condition + (Condition|uID) + (Condition|itemID)))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[1,4]stat.test$coefficients[1,3]stat.test$coefficients[1,5]Israel10Direction & Similarity (Tversky & Gati, 1978)
83
82282GatiGati.1blist(SimilarityA=c('gati1s.2','gati1s.3','gati1s.5','gati1s.11','gati1s.12','gati1s.14','gati1s.16','gati1s.17','gati1s.18','gati1s.19','gati1s.22','gati1s.4','gati1s.6','gati1s.7','gati1s.8','gati1s.9','gati1s.10','gati1s.13','gati1s.15','gati1s.20','gati1s.21'),SimilarityB=c('gati2s.2','gati2s.3','gati2s.5','gati2s.11','gati2s.12','gati2s.14','gati2s.16','gati2s.17','gati2s.18','gati2s.19','gati2s.22','gati2s.4','gati2s.6','gati2s.7','gati2s.8','gati2s.9','gati2s.10','gati2s.13','gati2s.15','gati2s.20','gati2s.21'))list(CounterBalance=c('SimilarityA','SimilarityB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.1lm.tsummary(lmerTest::lmer(DV ~ Condition + (Condition|uID) + (Condition|itemID)))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[2,4]stat.test$coefficients[2,3]stat.test$coefficients[2,5]Israel10Direction & Similarity (Tversky & Gati, 1978)
84
83282GatiGati.2list(SimilarityA=c('gati1s.2','gati1s.3','gati1s.5','gati1s.11','gati1s.12','gati1s.14','gati1s.16','gati1s.17','gati1s.18','gati1s.19','gati1s.22','gati1s.4','gati1s.6','gati1s.7','gati1s.8','gati1s.9','gati1s.10','gati1s.13','gati1s.15','gati1s.20','gati1s.21'),SimilarityB=c('gati2s.2','gati2s.3','gati2s.5','gati2s.11','gati2s.12','gati2s.14','gati2s.16','gati2s.17','gati2s.18','gati2s.19','gati2s.22','gati2s.4','gati2s.6','gati2s.7','gati2s.8','gati2s.9','gati2s.10','gati2s.13','gati2s.15','gati2s.20','gati2s.21'))list(CounterBalance=c('SimilarityA','SimilarityB'))list(each=c('CounterBalance','X > 0'))list(c('all'))110110varfun.Gati.2t.pt.test(x = Asymmetry, mu=0, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael11t.ptwo.sidedindependent (1 sample)15377771542.990.080.400.000.240.080.400.120.040.20This is a 1 sample t-test. Cohens d_z was used to estimate the effect size.Direction & Similarity (Tversky & Gati, 1978)
85
84282GatiGati.3list(SimilarityA=c('gati1s.2','gati1s.3','gati1s.5','gati1s.11','gati1s.12','gati1s.14','gati1s.16','gati1s.17','gati1s.18','gati1s.19','gati1s.22','gati1s.4','gati1s.6','gati1s.7','gati1s.8','gati1s.9','gati1s.10','gati1s.13','gati1s.15','gati1s.20','gati1s.21'),SimilarityB=c('gati2s.2','gati2s.3','gati2s.5','gati2s.11','gati2s.12','gati2s.14','gati2s.16','gati2s.17','gati2s.18','gati2s.19','gati2s.22','gati2s.4','gati2s.6','gati2s.7','gati2s.8','gati2s.9','gati2s.10','gati2s.13','gati2s.15','gati2s.20','gati2s.21'))list(CounterBalance=c('SimilarityA','SimilarityB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.3t.pt.test(DV ~ Condition, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative, paired = TRUE)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael10Direction & Similarity (Tversky & Gati, 1978)
86
85282GatiGati.4alist(DifferenceA=c('gati1d.2','gati1d.3','gati1d.5','gati1d.11','gati1d.12','gati1d.14','gati1d.16','gati1d.17','gati1d.18','gati1d.19','gati1d.22','gati1d.4','gati1d.6','gati1d.7','gati1d.8','gati1d.9','gati1d.10','gati1d.13','gati1d.15','gati1d.20','gati1d.21'),DifferenceB=c('gati2d.2','gati2d.3','gati2d.5','gati2d.11','gati2d.12','gati2d.14','gati2d.16','gati2d.17','gati2d.18','gati2d.19','gati2d.22','gati2d.4','gati2d.6','gati2d.7','gati2d.8','gati2d.9','gati2d.10','gati2d.13','gati2d.15','gati2d.20','gati2d.21'))list(CounterBalance=c('DifferenceA','DifferenceB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.1lm.tsummary(lmerTest::lmer(DV ~ Condition + (Condition|uID) + (Condition|itemID)))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[1,4]stat.test$coefficients[1,3]stat.test$coefficients[1,5]Israel10Direction & Similarity (Tversky & Gati, 1978)
87
86282GatiGati.4blist(DifferenceA=c('gati1d.2','gati1d.3','gati1d.5','gati1d.11','gati1d.12','gati1d.14','gati1d.16','gati1d.17','gati1d.18','gati1d.19','gati1d.22','gati1d.4','gati1d.6','gati1d.7','gati1d.8','gati1d.9','gati1d.10','gati1d.13','gati1d.15','gati1d.20','gati1d.21'),DifferenceB=c('gati2d.2','gati2d.3','gati2d.5','gati2d.11','gati2d.12','gati2d.14','gati2d.16','gati2d.17','gati2d.18','gati2d.19','gati2d.22','gati2d.4','gati2d.6','gati2d.7','gati2d.8','gati2d.9','gati2d.10','gati2d.13','gati2d.15','gati2d.20','gati2d.21'))list(CounterBalance=c('DifferenceA','DifferenceB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.1lm.tsummary(lmerTest::lmer(DV ~ Condition + (Condition|uID) + (Condition|itemID)))list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$coefficients[2,4]stat.test$coefficients[2,3]stat.test$coefficients[2,5]Israel10Direction & Similarity (Tversky & Gati, 1978)
88
87282GatiGati.5list(DifferenceA=c('gati1d.2','gati1d.3','gati1d.5','gati1d.11','gati1d.12','gati1d.14','gati1d.16','gati1d.17','gati1d.18','gati1d.19','gati1d.22','gati1d.4','gati1d.6','gati1d.7','gati1d.8','gati1d.9','gati1d.10','gati1d.13','gati1d.15','gati1d.20','gati1d.21'),DifferenceB=c('gati2d.2','gati2d.3','gati2d.5','gati2d.11','gati2d.12','gati2d.14','gati2d.16','gati2d.17','gati2d.18','gati2d.19','gati2d.22','gati2d.4','gati2d.6','gati2d.7','gati2d.8','gati2d.9','gati2d.10','gati2d.13','gati2d.15','gati2d.20','gati2d.21'))list(CounterBalance=c('DifferenceA','DifferenceB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.2t.pt.test(x = Asymmetry, mu=0, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael10Direction & Similarity (Tversky & Gati, 1978)
89
88282GatiGati.6list(DifferenceA=c('gati1d.2','gati1d.3','gati1d.5','gati1d.11','gati1d.12','gati1d.14','gati1d.16','gati1d.17','gati1d.18','gati1d.19','gati1d.22','gati1d.4','gati1d.6','gati1d.7','gati1d.8','gati1d.9','gati1d.10','gati1d.13','gati1d.15','gati1d.20','gati1d.21'),DifferenceB=c('gati2d.2','gati2d.3','gati2d.5','gati2d.11','gati2d.12','gati2d.14','gati2d.16','gati2d.17','gati2d.18','gati2d.19','gati2d.22','gati2d.4','gati2d.6','gati2d.7','gati2d.8','gati2d.9','gati2d.10','gati2d.13','gati2d.15','gati2d.20','gati2d.21'))list(CounterBalance=c('DifferenceA','DifferenceB'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.5t.pt.test(DV ~ Condition, conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative, paired = TRUE)list(conf.level=.95, var.equal=NA, censorNA=TRUE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael10Direction & Similarity (Tversky & Gati, 1978)
90
89282GatiGati.7list(SimilarityA=c('gati1s.2','gati1s.3','gati1s.5','gati1s.11','gati1s.12','gati1s.14','gati1s.16','gati1s.17','gati1s.18','gati1s.19','gati1s.22','gati1s.4','gati1s.6','gati1s.7','gati1s.8','gati1s.9','gati1s.10','gati1s.13','gati1s.15','gati1s.20','gati1s.21'),SimilarityB=c('gati2s.2','gati2s.3','gati2s.5','gati2s.11','gati2s.12','gati2s.14','gati2s.16','gati2s.17','gati2s.18','gati2s.19','gati2s.22','gati2s.4','gati2s.6','gati2s.7','gati2s.8','gati2s.9','gati2s.10','gati2s.13','gati2s.15','gati2s.20','gati2s.21'))list(CounterBalance=c('SimilarityA','SimilarityB'), Order=c('gatiBEFOREnore','gatiAFTERnore'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.4tt.test(Asymmetry ~ Order,conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael10Direction & Similarity (Tversky & Gati, 1978)
91
90282GatiGati.8list(DifferenceA=c('gati1d.2','gati1d.3','gati1d.5','gati1d.11','gati1d.12','gati1d.14','gati1d.16','gati1d.17','gati1d.18','gati1d.19','gati1d.22','gati1d.4','gati1d.6','gati1d.7','gati1d.8','gati1d.9','gati1d.10','gati1d.13','gati1d.15','gati1d.20','gati1d.21'),DifferenceB=c('gati2d.2','gati2d.3','gati2d.5','gati2d.11','gati2d.12','gati2d.14','gati2d.16','gati2d.17','gati2d.18','gati2d.19','gati2d.22','gati2d.4','gati2d.6','gati2d.7','gati2d.8','gati2d.9','gati2d.10','gati2d.13','gati2d.15','gati2d.20','gati2d.21'))list(CounterBalance=c('DifferenceA','DifferenceB'), Order=c('gatiBEFOREnore','gatiAFTERnore'))list(each=c('CounterBalance','X > 0'))list(c('all'))101000varfun.Gati.4tt.test(Asymmetry ~ Order,conf.level=stat.params$conf.level, var.equal = stat.params$var.equal, alternative = stat.params$alternative)list(conf.level=.95, var.equal=TRUE, censorNA=FALSE, alternative='two.sided',alpha=.05, within=FALSE)stat.test$statisticstat.test$parameterstat.test$p.valueIsrael10Direction & Similarity (Tversky & Gati, 1978)
92
90295628284175