Linlog(p,gamma,delta)=delta*p^gamma/(delta*p^gamma+(1-p)^gamma) Sbj_Local_Accuracy=Beta(18,25) Sbj_Local_Accuracy w=Linlog(Sbj_Local_Accuracy,2,1.15) Baserate_stimuli=Uniform(0,1) Baserate_stimuli Stimulus=Bernoulli(Baserate_stimuli) Stimulus Sbj_Local_Accuracy Subject_response=If(Stimulus=0,1-Bernoulli(Sbj_Local_Accuracy),Bernoulli(Sbj_Local_Accuracy)) Copy_of_Baserate_stimuli=Uniform(0,1) Copy_of_Baserate_stimuli Copy_of_Stimulus=Bernoulli(Copy_of_Baserate_stimuli) Copy_of_Stimulus Copy_of_w=Linlog(Copy_of_Stimulus,2,1.15) Copy_of_Sbj_Local_Accuracy=Beta(18,25) Copy_of_Stimulus Copy_of_Sbj_Local_Accuracy Copy_of_Subject_response=If(Copy_of_Stimulus=0,1-Bernoulli(Copy_of_Sbj_Local_Accuracy),Bernoulli(Copy_of_Sbj_Local_Accuracy)) subject confidence 43 242 144 305 Baserate stimuli 351 157 439 212 Stimulus 349 301 444 360 Sbj First Diagnosis 186 309 290 374 Sbj Local Accuracy 207 152 311 217 A 169 97 194 139 Copy of subject confidence 582 396 683 459 Copy of Baserate stimuli 875 181 963 236 Copy of Stimulus 893 287 988 346 Copy of Sbj First Diagnosis 697 285 801 350 Copy of Sbj Local Accuracy 731 176 835 241 B 671 110 696 152