설명
이것은 브라질 북동 지역의 농장 수준 크레이지 슬롯입니다. 있다 단 하나의 농장 유형 - 중간 규모. 3가지 유형의 토지와 위험이 있습니다. 수익이 고려됩니다.
소형 크레이지 슬롯 유형 :LP
카테고리 : 크레이지 슬롯 모델 라이브러리
메인 파일 : 크레이지 슬롯gms
$title NE 브라질의 크레이지 슬롯 농장 수준 모델(크레이지 슬롯SEQ=88)
$onText
이것은 브라질 북동부 지역의 농장 수준 모델입니다. 있다
단 하나의 농장 유형 - 중간 규모. 3가지 유형의 토지와 위험이 있습니다.
수익에 대해 고려됩니다.
Kutcher, GP 및 Scandizzo, PL, 북동부의 농업 경제
브라질. 존스 홉킨스 대학교 출판부, 볼티모어 및 런던, 1981.
키워드: 선형계획법, 농업경제학, 농업, 작물 수확량, 가축
$offText
$s타이틀 세트 정의
세트
c '작물' / 면-h '면-허바세오'
바나나 '바나나'
사탕수수 '사탕수수'
콩-아르 '콩-드-아랑카'
콩-코르 '콩-드-코르다'
오렌지 '오렌지'
마니악 '마니악'
옥수수 '옥수수'
사이잘 '사이잘' /
p '자르기 활동' / Crop-02 'cotton-herbaceo'
크롭-05 '바나나'
크롭-10 '사탕수수'
자르기-15 '오렌지'
자르기-16 'manioc'
작물-17 '옥수수'
작물-19 '사이잘'
Crop-25 '콩드코다 옥수수'
Crop-29 '면화-허바세오 콩-드-아랑카 옥수수'
Crop-30 '면화-허바세오 콩-데-코다 옥수수'
Crop-33 '콩드아랑카 옥수수'
Crop-36 '빈스-드-아란카 마니옥 옥수수' /
'토지 유형' / 좋음 '평평하고 물 근처 또는 습하고 저지대'
중간 '좋은 것보다 언덕이 많거나 더 건조함'
목초지 '재배된 목초지 또는 나무 작물' /
tm '개월' / 1월, 2월, 3월, 4월, 5월, 6월, 7월, 8월, 9월, 10월, 11월, 12월 /
sc(s) '작물 토지' / 좋음, 중간 /
r '가축 사료 대안' / rec-1*rec-3 /
타이 '연도' / 1960*1969 /
dr '가족소비 묶음 대안' / 하나, 둘, 셋 /
km '기술적 특징' / 장비, 비료, 종자, 콩나물, itech /
ps(p,s) '프로세스 토지 가능성';
별칭(s,sp);
매개변수
landc(s) '토지 데이터(ha)' / 양호 8.775
중간 11.64
목초지 21.92 /
rations(r) '가축 식량 공급 대안(cr 당 1인당)' / rec-1 5.141
Rec-2 21.646
Rec-3 49.845 /
xcropl(p,s) '자르기 활동 제한';
xcropl("crop-19","좋음") = 0.036;
xcropl("crop-19","medium") = 0.298;
테이블 ldp(s,s) '토지 하향 가능성'
좋은 매체
좋은 1
중간 -1 1
목초지 -1;
* 가축에 대한 토지 요구 사항은 높은 것 같지만 괜찮습니다. - 65페이지 파라 3
표 lio(s,r) '가축 사료 대체를 위한 토지 요구 사항(1인당 ha)'
녹음-1 녹음-2 녹음-3
중간 1.407 .611 .631
목초지 .209 2.03 .9 ;
테이블 노동(p,tm) '작물에 필요한 노동 소요량(ha당 인일)'
1월 2월 3월 4월 5월 6월 7월 8월 9월 10월
자르기-02 4.79 10.89 18.70 9.83 8.03 20.95 15.67 15.48 11.35 8.38
자르기-05 8.24 0.89 5.43 3.31 11.13 10.33 3.27 2.65 5.47 3.67
작물-10 5.78 3.37 4.03 7.09 4.64 5.91 7.67 9.23 5.93 9.05
작물-15 2.00 2.36 4.13 2.13 7.18 5.88 3.21 9.20 6.89 3.30
작물-16 5.71 7.60 7.28 8.15 8.48 10.71 9.34 12.76 8.93 10.22
작물-17 9.19 14.42 10.59 12.01 3.47 10.75 5.88 7.30 4.14 4.25
작물-19 1.22 1.11 0.56 0.78 1.19 0.44 1.89 3.04 2.93 4.99
작물-25 12.46 11.35 24.38 22.03 16.91 9.47 10.97 9.70 4.93 6.41
작물-29 5.54 10.30 9.24 8.97 15.82 13.00 14.74 10.64 5.64 4.90
작물-30 9.18 3.94 16.15 23.69 28.12 20.58 17.73 15.06 4.58 9.76
자르기-33 6.87 10.19 10.61 9.14 18.38 11.50 9.22 13.36 3.85 3.87
자르기-36 7.44 10.21 9.63 16.18 20.11 16.86 14.86 14.00 8.04 6.69
+ 11월 12월
자르기-02 8.23 4.54
자르기-05 3.18 1.44
자르기-10 7.59 6.37
자르기-15 9.70 8.87
자르기-16 6.18 8.34
자르기-17 3.49 2.11
작물-19 7.73 9.44
자르기-25 0.53 0.89
작물-29 4.73 4.92
자르기-30 7.39 2.67
자르기-33 2.65 1.09
작물-36 5.49 5.26;
테이블 llab(tm,r) '가축 사료에 대한 노동 소요량(인당 노동일수)'
녹음-1 녹음-2 녹음-3
1월 4.261 1.873 1.933
2월 2.854 1.262 1.302
3월 .040 .040 .040
4월 .040 .040 .040
5월 .040 .040 .040
6월 .040 .040 .040
7월 .040 .040 .040
8월 .040 .040 .040
9월 .040 .040 .040
10월 .040 .040 .040
11월 7.075 3.095 3.195
12월 7.075 3.095 3.195;
테이블 cbndl(c,dr) '소비 묶음(묶음당 톤)'
하나 둘 셋
콩-arr .225 .152 .15
마니옥 .965 2.64 .935
옥수수 .235 .232 .581;
테이블 crev(c,ty) '작물 수익 시계열(cr/ha)'
1960년 1961년 1962년 1963년 1964년 1965년 1966년 1967년 1968년 1969년
바나나 6399 8193 9215 8581 7988 7228 5923 6738 7221 7842
사탕수수 1667 1899 1898 2230 2265 2067 1499 1903 1901 1929
콩-cor 546 585 1091 651 470 621 605 518 519 772
마니옥 986 1543 2658 1639 1146 1380 1357 1702 1560 1580
옥수수 267 378 544 329 320 351 310 322 294 349;
매개변수
가격(c) '작물 기준 가격(kg당 cr)'
/ 면-h 1.9 , 바나나 4 , 사탕수수 35
beans-arr 2.5 , beans-cor 1.5 , 오렌지 10
마니옥 .17, 옥수수 .15, 사이잘 1/
ravg(c) '평균 작물 수익(cr/ha)'
prdev(c,ty) '곡물 가격 편차(cr/톤)';
* 임금자료: 159페이지
* 운전 자본: 이것이 맞나요: = 6.4 * 1113
* 가족노동 가능 : 맞나요?
스칼라
fwage '가족 유보 임금률(cr/인월)' / 75 /
twage '임시근로임금률(cr/인월)' / 250 /
pwage '상시근로임금률(cr/인년)' / 2054 /
vsc '자체 소비량(번들당 cr)' / 934 /
wcbar '운전 자본(cr)' / 7123.2 /
famlab '가족노동(남성 동등 노동)' / 70.5 /
lprice '가축 가격(인당 cr)' / 211 /
vetpr '수의학 서비스 비용(cr per head)' / 1 /
dpm '인당 노동일수' / 25 /
phi '위험 인자';
* 이러한 수확량 중 일부는 이상해 보입니다. 중간 토지가 좋은 토지보다 더 높은 토지를 가지고 있습니다.
테이블 수확량(p,c,s) '작물 수확량(ha당 kg)'
좋은 매체
Crop-02.cotton-h 848 569
자르기-05.바나나 221 174
작물-10.사탕수수 45 30
자르기-15.오렌지 92
자르기-16.manioc 4456 3964
작물-17.옥수수 725 563
작물-19.sisal 2244 1666
자르기-25.beans-cor 251 211
작물-25.옥수수 373 264
작물-29.cotton-h 269 149
자르기-29.beans-arr 285 221
작물-29.옥수수 536 544
자르기-30.면-h 403 133
자르기-30.beans-cor 115 352
자르기-30.옥수수 361 212
자르기-33.beans-arr 274 260
자르기-33.옥수수 594 442
자르기-36.beans-arr 288 287
자르기-36.manioc 3408 1031
작물-36.옥수수 503 328;
ps(p,s) = yes$sum(c, Yield(p,c,s));
ravg(c) = sum(ty, crev(c,ty))/card(ty);
prdev(c,ty)$ravg(c) = 1000*price(c)*(crev(c,ty)/ravg(c) - 1);
파이 = 1;
디스플레이 ravg, prdev;
테이블 techc(p,km) '작물 기술 요구 사항(cr/ha)'
장비 비료 씨앗 콩나물
자르기-02 31 91
자르기-05 45
자르기-10 36
자르기-15 106 1 184
자르기-16 20
자르기-17 42 55
자르기-29 4 22 19
자르기-30 27
자르기-33 11 42
자르기-36 98 6 1;
매개변수
pcost(p) '작물 기술 비용(cr/ha)'
a(p) '자르기 상수';
pcost(p) = sum(km, techc(p,km));
pcost 표시;
a(p) = 1;
a(p)$sum(s, Yield(p,"cotton-h",s)) = 0;
pcost, a를 표시합니다.
$sTitle 모델 정의
변수
xcrop(p,s) '자르기 활동(ha)'
xliver(r) '사료 기술에 정의된 가축 활동(머리)'
xlive '축산(수장)'
lswitch(s) '토지 하향 조정(ha)'
xprod(c) '작물 생산량(톤)'
cons(dr) '농장 내 소비량(톤)'
sales(c) '작물 판매량(톤)'
flab(tm) '가족 노동(남자일)'
tlab(tm) '임시 노동(man-days)'
plab '영구근로(근로자)'
rationr '가축 배급 요건(cr)'
pdev(ty) '양수 가격 편차(cr)'
ndev(ty) '음수 가격 편차(cr)'
yfarm '농가소득(cr)'
'농작물 및 가축 판매 수익(cr)'
Cropcost '회계: 자르기 활동 비용(cr)'
labcost '회계: 인건비 - 가족 포함(cr)'
vetcost '회계: 수의학 서비스 비용(cr)';
양수 변수 xcrop, xliver, lswitch, sales, cons, flab, tlab, plab, pdev, ndev;
방정식
landb(s) '토지 균형'
lbal '가축수지( )'
rliv '가축 배급 요건 정의( )'
mbalc(c) '재료수지: 작물( )'
dprod(c) '작물 생산 정의 ( )'
cond '농가 소비 정의( )'
labc(tm) '노동수급관계 ( )'
ddev(ty) '농작물 가격 편차 정의( )'
소득 '농가소득 정의( )'
arev '회계: 수익 정의( )'
acrop '회계: 자르기 비용 정의( )'
alab '회계: 인건비 정의( )'
awcc '회계: 운전 자본 요구 사항 ( )'
avet '회계: 수의학 비용(cr)';
landb(s).. sum(p$ps(p,s), a(p)*xcrop(p,s))$sc(s)
+ 합계(sp, ldp(s,sp)*lswitch(sp))
+ 합계(r, lio(s,r)*xliver(r))
=l= 토지(들);
lbal.. xlive =e= sum(r, xliver(r));
rliv..rationr =e= sum(r, rations(r)*xliver(r));
mbalc(c).. sum((s,p), Yield(p,c,s)*xcrop(p,s))/1000
=g= 매출(c) + 합계(dr, cbndl(c,dr)*cons(dr));
dprod(c).. xprod(c) =e= sum((p,s), Yield(p,c,s)*xcrop(p,s))/1000;
labc(tm).. sum((p,s)$ps(p,s), 노동(p,tm)*xcrop(p,s))
+ 합계(r, llab(tm,r)*xliver(r))
=l= flab(tm) + tlab(tm) + dpm*plab;
cond..sum(dr, cons(dr)) =e= 1;
ddev(ty).. sum(c, prdev(c,ty)*sales(c)) =e= pdev(ty) - ndev(ty);
arev.. 수익 =e= lprice*xlive + 1000*sum(c, 가격(c)*판매(c));
acrop..cropcost =e= sum((p,s)$ps(p,s), pcost(p)*xcrop(p,s));
alab..labcost =e= (fwage*sum(tm, flab(tm)) + twage*sum(tm, tlab(tm)))/dpm + pwage*plab;
awcc..cropcost + rationr + vetcost + twage/dpm*sum(tm, tlab(tm)) + pwage*plab =l= wcbar;
avet..vetcost =e= vetpr*xlive;
소득.. yfarm =e= 수익 + vsc*sum(dr, cons(dr)) - labcost - rationr - vetcost
- 작물 비용 - phi*sum(ty, pdev(ty) + ndev(ty))/card(ty);
모델은 '농장 수준 모델'에 동의합니다. / all /;
xcrop.up(p,s)$xcropl(p,s) = xcrop(p,s);
flab.up(tm) = famlab;
lp를 사용하여 yfarm을 최대화하는 크레이지 슬롯를 해결합니다.
파이 = 0;
lp를 사용하여 yfarm을 최대화하는 크레이지 슬롯를 해결합니다.