<title>PHP DSGE 22 労働供給弾力的 不確実性</title>
<head>
<script type="text/javascript" src="excanvas.js"></script>
<script type="text/javascript">
function loadpic()
{
var x;
var y;
var n;
phpdata = new Array;
var xmlHttp;
xmlHttp = new XMLHttpRequest();
xmlHttp.open("GET", "http://www11.atpages.jp/ce00582/dsge/phpdsge22.php?", false);
xmlHttp.send(null);
var php;
php=xmlHttp.responseText;
phpdata=php.split(",")
var canvas = document.getElementById("red_box");
var ctx = canvas.getContext("2d");
maxc=-999;
for (n=2;n<90;n++){
if (phpdata[n] > maxc){
maxc=phpdata[n];
}
}
minc=999;
for (n=2;n<90;n++){
if (phpdata[n] < minc){
minc=phpdata[n];
}
}
h=(maxc-minc)/400;
ctx.strokeStyle="red";
ctx.beginPath();
y=400-(phpdata[1]-minc)/h;
ctx.moveTo(100,y);
for (n=2;n<90;n++){
x=4*n+100;
y=400-(phpdata[n+1]-minc)/h;
ctx.lineTo(x,y);
}
ctx.stroke();
ctx.strokeStyle="black";
ctx.beginPath();
ctx.moveTo(100,0);
ctx.lineTo(100,400);
ctx.lineTo(500,400);
ctx.stroke();
for (n=1;n<10;n++){
ctx.beginPath();
ctx.moveTo(100+40*n,395);
ctx.lineTo(100+40*n,405);
ctx.stroke();
}
ctx.beginPath();
ctx.moveTo(300,390);
ctx.lineTo(300,410);
ctx.stroke();
for (n=1;n<20;n++){
ctx.beginPath();
ctx.moveTo(105,400-20*n);
ctx.lineTo(95,400-20*n);
ctx.stroke();
}
ctx.beginPath();
ctx.moveTo(110,300);
ctx.lineTo(90,300);
ctx.stroke();
ctx.beginPath();
ctx.moveTo(110,200);
ctx.lineTo(90,200);
ctx.stroke();
}
</script>
</head>
<body>
<img src="52.JPG" width="300" height="300">
<BR>
<BR>
<B>PHP DSGE 22 労働供給弾力的 不確実性</B>
<BR>
<BR>
図 消費の移行経路
<form name="myForm">
<input type="button" value="計算せよ" onClick="loadpic()">
</form>
<canvas id="red_box" width="500" height="500"></canvas>
<BR>
<BR>
</html>
最終更新：2009年11月21日 19:57
