설명
공간 가격 균형 모델은 다양한 차이점을 보여주기 위해 사용됩니다. 시장 행동을 모델링하는 방법. 이 변형에서는 다음을 살펴봅니다. 과점을 가정할 때 발생하는 Cournot-Nash 모델, 즉, 각 지역의 생산은 단일 회사에 의해 통제됩니다. 지역 기업이 독립적인 곳. Harker, PT, 공간 경쟁의 대안 모델. 운영 연구 34, 3(1986), 410-425. 기고자: Steven Dirkse, 2011년 6월
소형 모델 유형 :EQUIL
카테고리 : 슬롯 사이트 추천 EMP 라이브러리
메인 파일 : hark-oligop.gms 포함: hark-data.inc[html]
Harker의 $title SPE 모델 - 과점 버전(HARK-OLIGOP,SEQ=65)
$onText
공간적 가격 균형 모델은 다양한 것을 보여주기 위해 사용됩니다.
시장 행동을 모델링하는 방법. 이 변형에서는 다음을 살펴봅니다.
과점을 가정할 때 발생하는 Cournot-Nash 모델,
즉, 각 지역의 생산은 단일 회사에 의해 통제됩니다.
지역 기업이 독립적인 곳.
Harker, PT, 공간 경쟁의 대안 모델. 운영
연구 34, 3(1986), 410-425.
기고자: Steven Dirkse, 2011년 6월
$offText
$eolCom //
$include hark-data.inc
긍정적인 변수
t(n,n,Q) '회사의 운송량 Qs 상품'
dl(L,Q) 'Qs 모델에서 L 지역의 총 수요'
dlq(L,Q) 'Qs 모델에서 L 지역의 기업 Qs 상품에 대한 수요'
s(Q) 공급량
;
변수
ttVar(i,j) '호의 총 흐름'
cVar(i,j) '호상의 단위 운송 비용'
dlqVar(L,Q) '기업 QQ 모델에서 L 지역의 기업 QQ 상품에 대한 수요'
z(Q);
t.up(arc(i,j),Q)=100;
방정식
flowBal(n,Q) Qs 모델에서 좋은 Qs에 대한 흐름 균형
sBal(Q) 공급 잔고
in(L,Q) 유입 잔액
out(Q) 유출잔액
objDefD(Q) '운송 비용은 다양할 수 있음'
dlBalD(L,Q) 'dlqBar는 다양하게 허용됨'
ttVarDef(i,j)
cVarDef(i,j)
dlqVarDef(L,Q)
;
objDefD(Q).. z(Q) =e=
합계 L, (rho(L) - eta(L)*dl(L,Q)) * dlq(L,Q)
- (알파(Q)*s(Q) + 베타(Q)*sqr(s(Q)))
-sumarc(i,j), cVar(i,j) * t(i,j,Q);
flowBal(NL(n),Q).. sum(arc(n,j), t(n,j,Q)) =e= sum(arc(i,n), t(i,n,Q));
sBal(Q).. s(Q) =e= sumL, dlq(L,Q);
dlBalD(L,Q).. dl(L,Q) =E= dlq(L,Q) + sumQQ$[동일하지 않음(Q,QQ)], dlqVar(L,QQ);
in(L,Q)$[not sameas(L,Q)].. dlq(L,Q) =e= sumarc(i,L), t(i,L,Q);
out(Q)..s(Q) =E= dlq(Q,Q) + sumarc(Q,j), t(Q,j,Q);
ttVarDef(arc(i,j)).. ttVar(i,j) =E= sumQ, t(i,j,Q);
cVarDef(arc(i,j)).. cVar(i,j) =E= kappa(i,j) + nu(i,j)*sqr(ttVar(i,j));
dlqVarDef(L,Q).. dlqVar(L,Q) =E= dlq(L,Q);
모델 내쉬 / objDefD, flowBal, sBal, dlBalD, in, out,
ttVarDef, cVarDef, dlqVarDef /;
파일 myinfo / '%emp.info%' /;
put myinfo '* Harker 모델의 Cournot-Nash 평형 버전';
넣어 / '평형'
루프 Q,
넣다 / '최대' z(Q)/' ';
루프엘,
dl(L,Q) dlq(L,Q)를 넣어라;
;
s(Q) /' '를 넣습니다.
루프호(i,j),
t(i,j,Q)를 넣습니다.
;
put /' ' objDefD(Q);
루프NL(n),
flowBal(n,Q)를 넣어라;
;
놓다 /' ';
루프L,
dlBalD(L,Q)를 넣어라;
;
놓다 /' ';
루프L$[동일하지 않음(L,Q)],
(L,Q)를 넣으세요;
;
/ ' ' 출력(Q) sBal(Q);
;
넣어 / 'vi';
넣어 / 'ttVarDef ttVar';
넣어 / 'cVarDef cVar';
넣어 / 'dlqVarDef dlqVar';
닫다;
emp를 사용하여 Nash를 해결합니다.
422페이지의 매개변수 tab6 표 VI Harker 논문;
tab6("totProfit","oligop") = sumQ, z.l(Q);
tab6("totSupply","oligop") = sumQ, s.l(Q);
tab6("theta1","oligop") = rho('one') - eta('one')*dl.l('one','one');
tab6("theta2","oligop") = rho('two') - eta('two')*dl.l('two','two');
tab6("theta3","oligop") = rho('세') - eta('세')*dl.l('세','세');
디스플레이 탭6;