Code: Select all
$title mytestmodel
Set
t 'time' / t1*t10 /
i 'paper' / i1 /;
Variable
p(t,i) 'learned probability at time t about paper i'
Binary Variable a(t,i) 'action at time t about i';
Equation
upd(t,i) 'transition equation for p'
upd(t,i).. p(t,i)=e=((p(t-1,i)+(1-p(t-1,i))*0.7)*a(t,i)+(1-a(t,i))*p(t-1,i)*p0(t-1,i));
Model my modell /all/;
Code: Select all
p(t,i)=e=((p(t-1,i)+(1-p(t-1,i))*0.7)*a(t,i)+(1-a(t,i))*p(t-1,i)*p0(t-1,i));
Code: Select all
p(t)=func(p(t-1))