ゲーム攻略・無料ウィキレンタルのアットウィキ (@WIKI)

https://w.atwiki.jp/ce00582/pages/1010.html

vb DSGE 02 SOURCE VBDSGE02.exe プログラムを実行するには、Microsoft .NET Framework が必要です。

https://w.atwiki.jp/ce00582/pages/1136.html

import javax.swing.*; import java.awt.Graphics; import java.awt.Graphics2D; import java.awt.RenderingHints; import java.awt.geom.*; import java.awt.Color; import java.awt.BasicStroke; public class dsge27 extends JPanel{   public static void main(String[] args){     JFrame frame = new JFrame();     dsge27 app = new dsge27();     frame.getContentPane().add(app);     frame.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);     frame.setBounds(0, 0, 500, 500);     frame.setTitle("JAVA DSGE27 労働供給非弾力的");     frame.setVisible(true);   } public void paintComponent(Graphics g){ int n;     double data[]=new double[101]; Graphics2D g2 = (Graphics2D)g;     g2.setRenderingHint(RenderingHints.KEY_ANTIALIASING,                         RenderingHints.VALUE_ANTIALIAS_ON); data=dsge(); for (n=1;n 100;n++){ g2.draw(new Line2D.Double(5*n, 500-500*data[n], 5*n+5,500-500*data[n+1])); }   } static double[] dsge(){ double a; double beta; double ks; double h; double k[]=new double[101]; double cx[]=new double[101]; double cp[]=new double[101]; double k1; double n1; int n2; int n3; int n; double c1; double r1; double ep; double maxc; double minc; double data[]=new double[101]; double ct[]=new double[101]; int t; a=0.33; beta=0.95; ks=Math.pow((1 / beta - 1) / a , 1 / (a - 1)); h=2*ks/100; for (n=1;n 101;n++){ k[n]=n*h; cx[n]=Math.pow(k[n],a); } t=0; while(t 100){ for (n=10;n 91;n++){ k1=k[n]+Math.pow(k[n],a)-cx[n]; n1=k1/h; n2=(int)n1; n3=n2+1; c1=cx[n2]+(n1-n2)*(cx[n3]-cx[n2]); r1=a*Math.pow(k1,a-1); cp[n]=c1/(beta*(1+r1)); } ep=0; for (n=10;n 91;n++){ ep=ep+Math.pow(cx[n]-cp[n],2); } for (n=10;n 91;n++){ cx[n]=cp[n]; } if (ep 0.0001)t=1000;   t=t+1; } k1=k[47]; for (t=1;t 101;t++){ n1=k1/h; n2=(int)n1; n3=n2+1; c1=cx[n2]+(n1-n2)*(cx[n3]-cx[n2]); k1=k1+Math.pow(k1,a)-c1; ct[t]=c1; } minc=999; for (t=1;t 100;t++){ if (ct[t] minc)minc=ct[t]; } maxc=-999; for (t=1;t 100;t++){ if (ct[t] maxc)maxc=ct[t]; } for (t=1;t 100;t++){ data[t]=(ct[t]-minc)/(maxc-minc); } return data; } }

neogeo @ ウィキ - neo-geo

https://w.atwiki.jp/neogeo/pages/2.html

メニュートップページプラグイン紹介まとめサイト作成支援ツールメニューメニュー2 リンク @wiki @wikiご利用ガイド他のサービス無料ホームページ作成無料ブログ作成 2ch型掲示板レンタル無料掲示板レンタルお絵かきレンタル無料ソーシャルプロフここを編集

プログラム倉庫 - vb dsge 03 03

https://w.atwiki.jp/ce00582/pages/1013.html

VB DSGE 03 不確実性　労働供給非弾力的ソース vbdsge03.exe プログラムを実行するには、Microsoft .NET Framework が必要です。

arka @Wiki - mosgek

https://w.atwiki.jp/kakis/pages/8874.html

mosgek /// / ストライクボール mos\gek \ 16 seren klel \

arka @Wiki - mesgek

https://w.atwiki.jp/kakis/pages/8856.html

mesgek /// / ファウルボール mes\gek \ 16 seren klel \

プログラム倉庫 - JAVA DSGE

https://w.atwiki.jp/ce00582/pages/1425.html

JAVA DSGE DSGE WIKI 01 労働供給非弾力的 02 労働供給弾力的 03 労働供給弾力的　不確実性０４　労働供給弾力的　不確実性　貨幣供給一定０５　ニューケインジアン０１０７０１０８０１１００１１１０１１２０１１３０１１４０１１７ 0125 ０１２７０２０７０２０８０２１００２１１０２１２０２１３０２１４０２１７０２２５０２２７０３０１０３０２０３０３０３０４０３０５０３０６０３０７０３０８０３０９０３１００３１１０３１２０３１３ 0314 ０３１９０３２００３２１０３２２０３２３０３２４ 0325 0409 0509 ０６０９０６１０ - -

georgene - georgene

https://w.atwiki.jp/georgene/

一日楽しくなるブログコレで解決精力剤出産してやっと６ヶ月になります眠れない日々の連続でどうもお疲れ気味日記でも書きながら気分を一新したいですコメントなどもどうぞ(#^.^#)

プログラム倉庫 - PHP DSGE 16 G

https://w.atwiki.jp/ce00582/pages/961.html

title PHP DSGE 16 労働供給非弾力的　不確実性 /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/phpdsge16.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="blue"; 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 PHPDSGE16 労働供給非弾力的、不確実性 /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

arka @Wiki - tasgek

https://w.atwiki.jp/kakis/pages/10002.html

tasgek /// / 大砲の弾、砲丸、大玉 tas\gek \ 14 seren klel 大きい球 \