約 1,657 件
https://w.atwiki.jp/mywine/pages/28.html
シャトーカミヤ 牛久ワイナリー Chateau Kamiya Ushiku Winery HP Link 茨城県牛久市中央3-20-1 TEL 029-873-3151 FAX 029-874-3441 ブルワリーも併設、地ビール・バーベキューガーデン・世界のワイン販売 レストラン・パン工房・カフェ等があり、1日楽しめそう。 ドラマ【花ざかりの君たちへ~イケメンパラダイス~】のロケ地(桜咲学園校舎) 出演:堀北真希・小栗旬・生田 斗真・水嶋ヒロ 合同酒精 オエノン 茨城県のワイナリーへ戻る
https://w.atwiki.jp/ce00582/pages/2158.html
class pro{ public static void main(String args[]){ int m,mx,s1,s2,n1,n2,n3,n4,n5,n6; int nx1,nx2,nx3,nx4,nx5,nx6; int nxs1,nxs2,nxs3,nxs4,nxs5,nxs6; double tk,tl,tr,ww,maxw,tks,tls,trs; double th1[]=new double[11]; double th2[]=new double[11]; double c[][]=new double[11][3]; double y1[][]=new double[11][3]; double y2[][]=new double[11][3]; double w[][][][][][][]=new double[11][3][3][3][3][3][3]; double u[][][][][][][]=new double[11][3][3][3][3][3][3]; double v[][][][][][][][]=new double[11][3][3][3][3][3][3][11]; int goto1[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int goto2[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int goto3[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int goto4[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int goto5[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int goto6[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; int gotom[][][][][][][][]=new int[11][3][3][3][3][3][3][11]; double endv[][][][][][]=new double[3][3][3][3][3][3]; int end1[][][][][][]=new int[3][3][3][3][3][3]; int end2[][][][][][]=new int[3][3][3][3][3][3]; int end3[][][][][][]=new int[3][3][3][3][3][3]; int end4[][][][][][]=new int[3][3][3][3][3][3]; int end5[][][][][][]=new int[3][3][3][3][3][3]; int end6[][][][][][]=new int[3][3][3][3][3][3]; int endm[][][][][][]=new int[3][3][3][3][3][3]; int op1[][]=new int[11][3]; int op2[][]=new int[11][3]; int opc[][]=new int[11][3]; int t1; double h; double cp,yp1,yp2,cs,ys1,ys2; double w1,w2,z1,u1,u2,v1,v2,v3,maxv,supv; int max1,max2,max3,max4,max5,max6; int p,p1,p2,px1,px2,px,mxs; int sup1,sup2,d1,d2; int j,e; for (s1=1;s1 11;s1++){ th1[s1]=0.2*s1; } for (s2=1;s2 3;s2++){ th2[s2]=0.5*s2; } maxw=-999; tks=0; tls=0; trs=0; for (n1=5;n1 40;n1++){ for (n2=5;n2 40;n2++){ tk=0.01*n1; tl=0.01*n2; tr=trs(tk,tl,th1,th2); ww=wel(tk,tl,tr,th1,th2); if (ww maxw)tks=tk; if (ww maxw)tls=tl; if (ww maxw)trs=tr; if (ww maxw)maxw=ww; } } System.out.println(tks); System.out.println(tls); tk=tks; tl=tls; tr=trs; for (s1=1;s1 11;s1++){ for (s2=1;s2 3;s2++){ y1[s1][s2]=th1[s1]*mlx(s1,s2,tk,tl,tr,th1,th2); y2[s1][s2]=th2[s2]*flx(s1,s2,tk,tl,tr,th1,th2); c[s1][s2]=(1-tk)*y1[s1][s2]+(1-tl)*y2[s1][s2]+tr; } } h=0.001; t1=0; while(t1 10){ for (s1=1;s1 11;s1++){ for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ cs=c[s1][1]+n3*h; ys1=y1[s1][1]+n1*h; ys2=y2[s1][1]+n2*h; cp=c[s1][2]+n6*h; yp1=y1[s1][2]+n4*h; yp2=y2[s1][2]+n5*h; u1=Math.log(cs)+Math.log(1-ys1/th1[s1])+Math.log(1-ys2/th2[1]); w1=Math.log(cs)+Math.log(1-ys1/th1[s1])+Math.log(1-ys2/th2[2]); u2=Math.log(cp)+Math.log(1-yp1/th1[s1])+Math.log(1-yp2/th2[2]); if (w1 u2)u2=-999; u[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=u1+u2; } } } } } } } for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ for (m=-5;m 6;m++){ v[1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=-999; } } } } } } } for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ m=n1+n2+n4+n5-n3-n6; u1=u[1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]; px=0; if (m 5)px=100; if (m -5)px=100; if (px 50)m=0; if (px 50)u1=-999; v[1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=u1; } } } } } } for (s1=2;s1 10;s1++){ for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ for (m=-5;m 6;m++){ u1=u[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]; mx=m-n1-n2-n4-n5+n3+n6; px=0; if (mx 5)px=100; if (mx -5)px=100; if (px 50)mx=0; maxv=-999; nxs1=0; nxs2=0; nxs3=0; nxs4=0; nxs5=0; nxs6=0; for (nx1=-1;nx1 2;nx1++){ for (nx2=-1;nx2 2;nx2++){ for (nx3=-1;nx3 2;nx3++){ for (nx4=-1;nx4 2;nx4++){ for (nx5=-1;nx5 2;nx5++){ for (nx6=-1;nx6 2;nx6++){ v1=u1+v[s1-1][nx1+1][nx2+1][nx3+1][nx4+1][nx5+1][nx6+1][mx+5]; if (v1 maxv)nxs1=nx1; if (v1 maxv)nxs2=nx2; if (v1 maxv)nxs3=nx3; if (v1 maxv)nxs4=nx4; if (v1 maxv)nxs5=nx5; if (v1 maxv)nxs6=nx6; if (v1 maxv)maxv=v1; } } } } } } if (px 50)maxv=-999; goto1[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs1; goto2[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs2; goto3[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs3; goto4[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs4; goto5[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs5; goto6[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=nxs6; gotom[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=mx; v[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]=maxv; } } } } } } } } for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ u1=u[10][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]; mx=-n1-n2-n4-n5+n3+n6; px=0; if (mx 5)px=100; if (mx -5)px=100; if (px 50)mx=0; nxs1=0; nxs2=0; nxs3=0; nxs4=0; nxs5=0; nxs6=0; maxv=-999; for (nx1=-1;nx1 2;nx1++){ for (nx2=-1;nx2 2;nx2++){ for (nx3=-1;nx3 2;nx3++){ for (nx4=-1;nx4 2;nx4++){ for (nx5=-1;nx5 2;nx5++){ for (nx6=-1;nx6 2;nx6++){ v1=u1+v[9][nx1+1][nx2+1][nx3+1][nx4+1][nx5+1][nx6+1][mx+5]; if (v1 maxv)nxs1=nx1; if (v1 maxv)nxs2=nx2; if (v1 maxv)nxs3=nx3; if (v1 maxv)nxs4=nx4; if (v1 maxv)nxs5=nx5; if (v1 maxv)nxs6=nx6; if (v1 maxv)maxv=v1; } } } } } } if (px 50)maxv=-999; end1[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs1; end2[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs2; end3[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs3; end4[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs4; end5[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs5; end6[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=nxs6; endm[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=mx; endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]=maxv; } } } } } } nx1=0; nx2=0; nx3=0; nx4=0; nx5=0; nx6=0; maxv=-999; for (n1=-1;n1 2;n1++){ for (n2=-1;n2 2;n2++){ for (n3=-1;n3 2;n3++){ for (n4=-1;n4 2;n4++){ for (n5=-1;n5 2;n5++){ for (n6=-1;n6 2;n6++){ if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx1=n1; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx2=n2; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx3=n3; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx4=n4; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx5=n5; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)nx6=n6; if (endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1] maxv)maxv=endv[n1+1][n2+1][n3+1][n4+1][n5+1][n6+1]; } } } } } } opc[10][1]=nx3; op1[10][1]=nx1; op2[10][1]=nx2; opc[10][2]=nx6; op1[10][2]=nx4; op2[10][2]=nx5; System.out.println(maxv); m=endm[nx1+1][nx2+1][nx3+1][nx4+1][nx5+1][nx6+1]; for (j=1;j 10;j++){ s1=10-j; n1=op1[s1+1][1]; n2=op2[s1+1][1]; n3=opc[s1+1][1]; n4=op1[s1+1][2]; n5=op2[s1+1][2]; n6=opc[s1+1][2]; op1[s1][1]=goto1[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; op2[s1][1]=goto2[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; opc[s1][1]=goto3[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; op1[s1][2]=goto4[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; op2[s1][2]=goto5[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; opc[s1][2]=goto6[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; m=gotom[s1][n1+1][n2+1][n3+1][n4+1][n5+1][n6+1][m+5]; } e=0; for (s1=2;s1 11;s1++){ for (s2=1;s2 3;s2++){ e=e+opc[s1][s2]*opc[s1][s2]; e=e+op1[s1][s2]*op1[s1][s2]; e=e+op2[s1][s2]*op2[s1][s2]; } } System.out.println(e); for (s1=2;s1 11;s1++){ for (s2=1;s2 3;s2++){ c[s1][s2]=c[s1][s2]+h*opc[s1][s2]; y1[s1][s2]=y1[s1][s2]+h*op1[s1][s2]; y2[s1][s2]=y2[s1][s2]+h*op2[s1][s2]; } } t1=t1+1; } } static double trs(double tk,double tl,double[] th1,double[] th2){ double tr1,tr2,tr3,b1,b2; int t1; tr1=0.01; tr2=0.4; tr3=0; b1=bud(tk,tl,tr1,th1,th2); t1=0; while(t1 100){ b2=bud(tk,tl,tr2,th1,th2); tr3=tr2-b2*(tr2-tr1)/(b2-b1); b1=b2; tr1=tr2; tr2=tr3; b1=b2; if (b2*b2 0.001)t1=1000; t1=t1+1; } return tr3; } static double wel(double tk,double tl,double tr,double[] th1,double[] th2){ int s1,s2; double ww,w1,w2,l1,l2,c1; ww=0; for (s1=1;s1 11;s1++){ for (s2=1;s2 3;s2++){ w1=(1-tk)*th1[s1]; w2=(1-tl)*th2[s2]; l1=mlx(s1,s2,tk,tl,tr,th1,th2); l2=flx(s1,s2,tk,tl,tr,th1,th2); c1=w1*l1+w2*l2+tr; ww=ww+Math.log(c1)+Math.log(1-l1)+Math.log(1-l2); } } return ww; } static double bud(double tk,double tl,double tr,double[] th1,double[] th2){ int s1,s2; double b1,w1,w2,l1,l2,c1; b1=0; for (s1=1;s1 11;s1++){ for (s2=1;s2 3;s2++){ w1=(1-tk)*th1[s1]; w2=(1-tl)*th2[s2]; l1=mlx(s1,s2,tk,tl,tr,th1,th2); l2=flx(s1,s2,tk,tl,tr,th1,th2); c1=w1*l1+w2*l2+tr; b1=b1+th1[s1]*l1+th2[s2]*l2-c1; } } return b1; } static double mlx(int s1,int s2,double tk,double tl,double tr,double[] th1,double[] th2){ double w1,w2,c1,l1,l2; int px; w1=(1-tk)*th1[s1]; w2=(1-tl)*th2[s2]; c1=(w1+w2+tr)/3; l1=1-c1/w1; l2=1-c1/w2; px=0; if (l1 0)px=px+1; if (l1==0)px=px+1; if (l2 0)px=px+1; if (px==2)l1=0; if (px==2)l2=(w2-tr)/2; px=0; if (l2 0)px=px+1; if (l2==0)px=px+1; if (l1 0)px=px+1; if (px==2)l2=0; if (px==2)l1=(w1-tr)/2; return l1; } static double flx(int s1,int s2,double tk,double tl,double tr,double[] th1,double[] th2){ double w1,w2,c1,l1,l2; int px; w1=(1-tk)*th1[s1]; w2=(1-tl)*th2[s2]; c1=(w1+w2+tr)/3; l1=1-c1/w1; l2=1-c1/w2; px=0; if (l1 0)px=px+1; if (l1==0)px=px+1; if (l2 0)px=px+1; if (px==2)l1=0; if (px==2)l2=(w2-tr)/2; px=0; if (l2 0)px=px+1; if (l2==0)px=px+1; if (l1 0)px=px+1; if (px==2)l2=0; if (px==2)l1=(w1-tr)/2; return l2; } }
https://w.atwiki.jp/ce00582/pages/828.html
Function lx(s As Single, th, tl As Single, tr As Single) As Single Dim ls As Single ls = ((1 - tl) * th(s) - tr) / (2 * (1 - tl) * th(s)) If ls 0 Then ls = 0 lx = ls End Function Function cx(s As Single, th, tl As Single, tr As Single) As Single Dim ls As Single ls = ((1 - tl) * th(s) - tr) / (2 * (1 - tl) * th(s)) If ls 0 Then ls = 0 cx = (1 - tl) * th(s) * ls + tr End Function Function tls(th) As Single Dim maxw As Single Dim tl As Single Dim tr As Single Dim tp As Single Dim w1 As Single Dim n As Single maxw = -999 For n = 1 To 400 tl = 0.001 * n tr = trs(th, tl) w1 = wel(th, tl, tr) If w1 maxw Then tp = tl If w1 maxw Then maxw = w1 Next tls = tp End Function Function trs(th, tl As Single) As Single Dim tr1 As Single Dim tr2 As Single Dim tr3 As Single Dim b1 As Single Dim b2 As Single Dim t As Single tr1 = 0 tr2 = 0.1 t = 0 Do Until t 100 b1 = bud(th, tl, tr1) b2 = bud(th, tl, tr2) tr3 = tr2 - b2 * (tr2 - tr1) / (b2 - b1) tr1 = tr2 tr2 = tr3 If (tr1 - tr2) ^ 2 10 ^ (-5) Then t = 1000 t = t + 1 Loop trs = tr2 End Function Function wel(th, tl As Single, tr As Single) As Single Dim w1 As Single Dim s As Single Dim ls As Single Dim cs As Single w1 = 0 For s = 1 To 100 ls = lx(s, th, tl, tr) If ls 0 Then ls = 0 cs = cx(s, th, tl, tr) w1 = w1 + Log(cs) + Log(1 - ls) Next wel = w1 End Function Function bud(th, tl As Single, tr As Single) As Single Dim w1 As Single Dim s As Single Dim ls As Single Dim cs As Single Dim ys As Single ys = 0 cs = 0 For s = 1 To 100 ls = lx(s, th, tl, tr) If ls 0 Then ls = 0 ys = ys + th(s) * ls cs = cs + cx(s, th, tl, tr) Next bud = ys - cs End Function Private Sub Command1_Click() Dim th(1 To 100) As Single Dim s As Single Dim tl As Single Dim tr As Single Dim c(1 To 100) As Single Dim y(1 To 100) As Single Dim w1 As Single For s = 1 To 100 th(s) = 0.02 * s Next tl = tls(th) tr = trs(th, tl) Debug.Print tl, tr For s = 1 To 100 c(s) = cx(s, th, tl, tr) y(s) = th(s) * lx(s, th, tl, tr) Next Open "c /101.txt" For Output As #1 For s = 1 To 100 Write #1, s, c(s), y(s) Next Close #1 End Sub
https://w.atwiki.jp/wiki1_ikp/pages/32.html
イベントや札(456確定等)の信用度 選択肢 投票 80%〜 (0) 60〜79% (1) 40〜59% (1) 20〜39% (3) 〜19% (36) 店員の態度最悪!!!!!!!!!! -- 名無しさん (2005-11-11 07 25 12) 5・6イベントだが出方怪しい。店やる気無し。 -- 名無しさん (2007-05-12 17 23 39) せっかくキレイなホールなのでもっと気合入れてほしぃ -- 名無しさん (2007-05-12 17 24 24) 頻繁にストック飛ばしてる。ラインナップがクソ。行く価値なし。最初だけ。 -- 名無しさん (2007-06-05 05 12 41) 朝の「本日番長全台4確定!!」のメールには吹いたwいばるなw -- 名無しさん (2007-06-05 05 14 10) 夜いるダルッビッシュ気取りの店員死ね、ひょろくて東南アジア人の顔。朝いる相撲とプロレスが合体したデブ店員も死ね -- 名無しさん (2009-01-19 20 45 33) 名前 コメント 新装開店だったら 選択肢 投票 朝並んででも行く (0) 開店したら行く (0) 時間があったら行く (2) 行かない (11) 名前 コメント 裏物や遠隔は 選択肢 投票 あると思う (10) ないと思う (0) 名前 コメント その他、この店に対して思うこと 警備員が言ってたぞ!客が少なくなったって。八百長出玉操作 -- 茨城 (2008-02-22 22 31 13) ホルコンのシュミレーションを当日稼動中に自在に操作!営業割 -- 茨城 (2008-02-27 10 07 45) 散々悪さして、グランドオープンかい。 -- 茨城 (2008-03-07 09 33 09) 名前 コメント
https://w.atwiki.jp/ce00582/pages/2768.html
import java.awt.*; import java.awt.event.*; import java.awt.image.*; class pro extends Frame{ PixelGrabber pg; Color col; Image img; int w=665; int h=886; int pix[]=new int[w*h]; int red,green,blue; int memor[][]=new int[h][w]; int memog[][]=new int[h][w]; int memob[][]=new int[h][w]; int m,n; pro() { img = createImage(w,h); img = Toolkit.getDefaultToolkit().getImage("model.jpg"); pg = new PixelGrabber(img,0,0,w,h,pix,0,w); try{pg.grabPixels();}catch(InterruptedException ie){} m=0; n=0; for(int i=0;i w*h;i++){ int p = pix[i]; col=new Color(pix[i]); red=col.getRed(); green=col.getGreen(); blue=col.getBlue(); memor[m][n]=red; memog[m][n]=green; memob[m][n]=blue; n=n+1; if(n==w)m=m+1; if(n==w)n=0; } } public static void main(String[] args) { pro f = new pro(); f.setSize(1000,1000); f.addWindowListener(new WindowAdapter(){public void windowClosing(WindowEvent e){System.exit(0);}}); f.setVisible(true); } public void paint( Graphics g ) { int i,mx,nx,p; mx=0; nx=0; p=10; for (mx=0;mx 50;mx++){ for (nx=0;nx 50;nx++){ g.setColor(new Color(memor[p*mx][p*nx],memog[p*mx][p*nx],memob[p*mx][p*nx])); g.drawString("R",100+p*nx,p*mx+100); } } } }
https://w.atwiki.jp/ce00582/pages/2128.html
class pro{ public static void main(String args[]){ double c[]=new double[11]; double y[]=new double[11]; double cs[]=new double[11]; double ys[]=new double[11]; double th[]=new double[11]; double a[][]=new double[51][91]; int s,m,n,j; int maxn,maxm,px; double maxv,minv,x1,x2,z,e; double u1,u2; double h; int t1,t3,t4; int p1; for (s=1;s 11;s++){ th[s]=1+0.1*s; y[s]=0.5*th[s]; c[s]=y[s]; } t4=0; h=0.02; while(t4 5){ t3=0; h=h/2; while(t3 100){ for (m=0;m 42;m++){ for (n=0;n 82;n++){ a[m][n]=0; } } for (s=1;s 11;s++){ n=4*s-3; a[0][n]=1/c[s]; a[0][n+1]=-1/c[s]; a[0][n+2]=1/(y[s]-th[s]); a[0][n+3]=-1/(y[s]-th[s]); } for (s=2;s 11;s++){ m=39+s; n=4*s-3; a[m][n]=-1/c[s]; a[m][n+1]=1/c[s]; a[m][n+2]=-1/(y[s]-th[s]); a[m][n+3]=1/(y[s]-th[s]); } for (s=2;s 11;s++){ m=39+s; n=4*s-7; a[m][n]=1/c[s-1]; a[m][n+1]=-1/c[s-1]; a[m][n+2]=1/(y[s-1]-th[s]); a[m][n+3]=-1/(y[s-1]-th[s]); } for (s=2;s 11;s++){ m=39+s; u1=Math.log(c[s])+Math.log(1-y[s]/th[s]); u2=Math.log(c[s-1])+Math.log(1-y[s-1]/th[s]); a[m][0]=u1-u2; if (a[m][0] 0)a[m][0]=0.0001; } for (m=1;m 41;m++){ a[m][m]=1; } for (m=1;m 51;m++){ a[m][m+40]=1; } for (s=1;s 11;s++){ n=4*s-3; a[50][n]=1; a[50][n+1]=-1; a[50][n+2]=-1; a[50][n+3]=1; } for (m=1;m 41;m++){ a[m][0]=h; } maxv=0; maxn=999; for (n=1;n 91;n++){ if (a[0][n] maxv)maxn=n; if (a[0][m] maxv)maxv=a[0][n]; } System.out.println(maxn); t1=0; while(t1 100){ minv=999; maxm=999; for (m=1;m 51;m++){ x1=a[m][maxn]; px=0; if (x1==0)px=100; if (x1 0)px=100; if (px 50)x1=1; x2=a[m][0]/x1; if (px 50)x2=1000; if (x2 minv)maxm=m; if (x2 minv)minv=x2; } System.out.println(maxm); for (m=0;m 51;m++){ z=a[m][maxn]/a[maxm][maxn]; if (m==maxm)z=0; for (n=0;n 91;n++){ a[m][n]=a[m][n]-z*a[maxm][n]; } } maxv=0; maxn=999; for (n=1;n 91;n++){ if (a[0][n] maxv)maxn=n; if (a[0][m] maxv)maxv=a[0][n]; } System.out.println(maxn); if (maxn 900)t1=1000; t1=t1+1; } for (s=1;s 11;s++){ cs[s]=c[s]; ys[s]=y[s]; } for (s=1;s 11;s++){ p1=0; n=4*s-3; for (m=1;m 51;m++){ if (a[m][n]==0)p1=p1+1; } while(p1==49){ for (m=1;m 51;m++){ if (a[m][n] 0)cs[s]=c[s]+a[m][0]/a[m][n]; if (a[m][n] 0)cs[s]=c[s]+a[m][0]/a[m][n]; p1=0; } } p1=0; n=4*s-2; for (m=1;m 51;m++){ if (a[m][n]==0)p1=p1+1; } while(p1==49){ for (m=1;m 51;m++){ if (a[m][n] 0)cs[s]=c[s]-a[m][0]/a[m][n]; if (a[m][n] 0)cs[s]=c[s]-a[m][0]/a[m][n]; p1=0; } } p1=0; n=4*s-1; for (m=1;m 51;m++){ if (a[m][n]==0)p1=p1+1; } while(p1==49){ for (m=1;m 51;m++){ if (a[m][n] 0)ys[s]=y[s]+a[m][0]/a[m][n]; if (a[m][n] 0)ys[s]=y[s]+a[m][0]/a[m][n]; p1=0; } } p1=0; n=4*s; for (m=1;m 51;m++){ if (a[m][n]==0)p1=p1+1; } while(p1==49){ for (m=1;m 51;m++){ if (a[m][n] 0)ys[s]=y[s]-a[m][0]/a[m][n]; if (a[m][n] 0)ys[s]=y[s]-a[m][0]/a[m][n]; p1=0; } } } e=0; for (s=1;s 11;s++){ e=e+(c[s]-cs[s])*(c[s]-cs[s]); e=e+(y[s]-ys[s])*(y[s]-ys[s]); } if (e 0.0001)t3=1000; for (s=1;s 11;s++){ c[s]=cs[s]; y[s]=ys[s]; } t3=t3+1; } t4=t4+1; } for (s=1;s 11;s++){ System.out.println(c[s]); System.out.println(y[s]); } } }
https://w.atwiki.jp/wiki1_ikp/pages/28.html
イベントや札(456確定等)の信用度 選択肢 投票 80%〜 (1) 60〜79% (0) 40〜59% (4) 20〜39% (1) 〜19% (4) 名前 コメント 新装開店だったら 選択肢 投票 朝並んででも行く (0) 開店したら行く (0) 時間があったら行く (3) 行かない (6) 名前 コメント 裏物や遠隔は 選択肢 投票 あると思う (14) ないと思う (1) 名前 コメント その他、この店に対して思うこと 名前 コメント
https://w.atwiki.jp/ibarakigasstation/pages/54.html
名前 コメント
https://w.atwiki.jp/ce00582/pages/3052.html
class dsge{ public static void main(String args[]){ double a,beta; double ks,ls,h; double k[]=new double[101]; double cx[]=new double[101]; double cp[]=new double[101]; double lx[]=new double[101]; double lp[]=new double[101]; double k1,l1,r1,c1,w1; int n,n2,n3; double n1; double e; int t; beta=0.95; a=0.33; ls=0.5; ks=ks=Math.pow((1 / beta - 1) / a , 1 / (a - 1)); ks=ks*ls; h=2*ks/100; for (n=1;n 101;n++){ k[n]=n*h; lx[n]=ls; cx[n]=Math.pow(k[n],a)*Math.pow(ls,1-a); } t=0; while(t 100){ for (n=10;n 91;n++){ k1=k[n]+Math.pow(k[n],a)*Math.pow(lx[n],1-a)-cx[n]; n1=k1/h; n2=(int)n1; n3=n2+1; c1=cx[n2]+(n1-n2)*(cx[n3]-cx[n2]); l1=lx[n2]+(n1-n2)*(lx[n3]-lx[n2]); r1=a*Math.pow(k1,a-1)*Math.pow(l1,1-a); cp[n]=c1/(beta*(1+r1)); w1=(1-a)*Math.pow(k[n],a)*Math.pow(lx[n],-a); lp[n]=1-cx[n]/w1; } e=0; for (n=10;n 91;n++){ e=e+(cp[n]-cx[n])*(cp[n]-cx[n]); e=e+(lp[n]-lx[n])*(lp[n]-lx[n]); } for (n=10;n 91;n++){ cx[n]=cp[n]; lx[n]=lp[n]; } if (e 0.0001)t=1000; System.out.println(e); t=t+1; } } }
https://w.atwiki.jp/darui_program/pages/312.html
日時:2010年1月の3週目か4週目の日曜日(予定) 集合場所:おそらく柏 集合時間:不明(シャトーカミヤへ10 00に着くようにします。) 予算:10000円、一万円(位で見積もりたい・・・) 内容:シャトーカミヤを見学して、ワイン飲んで、近くでご飯食べて帰宅 備考:今回は、行きつけの店のバーテンダーの方がいらっしゃいます。 参加はここで(スケジュール調整のちょー助を使ってみたw) [PCから] http //chosuke.rumix.jp/main.aspx?g=176054be7917383e6 [携帯電話から] http //chosuke.rumix.jp/x/main.aspx?g=176054be7917383e6 パスワード:waine 園内マップ 名前 営業時間 紹介文 レストラン キャノン 11:30~21:00 100年の歴史を持つワイン貯蔵庫を改装した風雅なフレンチレストランです 日本料理 富貴洞 11:30~21:00 日本庭園を眺めながらゆったりとこだわりの会席料理がお楽しみいただけます ラ・テラス・ドゥ・オエノン 11:30~21:00 緑に囲まれた店内で、できたての地ビールと創作料理をお楽しみいただけます バーベキューガーデン 11:30~21:00 できたての地ビールとともに、バーベキューをお楽しみいただけます カフェ アベイユ 10:00~17:30(土・日・祝日は18:00まで) やすらぎのひとときをお過ごしいただけるカフェです パン工房 10:00~19:00 天然酵母を使用したパンやこだわりの特製ケーキを取り揃えています ワインセラー 10:00~18:00 世界各国から選りすぐりのワインを取り揃えた専門店です スーベニアショップ 10:00~18:00 シャトーカミヤオリジナル商品や、オエノングループ各社のお酒を販売しています 神谷傳兵衛記念館 10:00~17:00 神谷傳兵衛の足跡を貴重な資料とともにご紹介しています 牛久ブルワリー -* 1年を通じてさまざまな地ビールの醸造を行っています 牛久ワイナリー -* 葡萄の城、カミヤスペシャルセレクションなどのボトリングの工程を行っています 多分、こんな流れになると思う・・・ 10 00現地到着→神谷傳兵衛記念館→昼飯→ワインセラー見学(?)、お土産の買い物→晩御飯→柏駅解散 個人的な考えでは、レストラン関係は全部お高めなので、 昼にパン工房でパン買って、後どっかにワイン売ってるでしょってことでワインw 晩御飯は、豪勢に行くって感じかな~ 今回は、12月末までに参加表明(ノ)して下さい。 -- だるい (2009-11-17 12 30 54) ノ -- だるい (2009-11-17 12 31 02) 行くところの公式サイト→http //www.ushiq.net/~kamiya/home/main.htm -- だるい (2009-11-17 12 32 09) 見学が見当たらなかったけど、ワイン工場ではないのか・・・? -- だるい (2009-11-17 12 54 38) 何か意見、アイディアがあれば言って下さい~。なるべく叶えます。 -- だるい (2009-11-17 13 00 23) ちょー助(スケジュール管理サイト)使ったから「ノ」なしでよろw -- だるい (2009-11-17 15 44 06) メンバーのみなさん、参加の可否を書き込んで下さい。もしくは、予定が未定でもいいから。 -- だるい (2009-11-30 11 14 00) 登録しておきました。 イベントごとには当分参加できないと思います・・・ -- タツ (2009-11-30 16 19 49) う~ん、残念。まぁ、しゃーないでしょ。ナルハヤで復帰を願ってます。 -- だるい (2009-11-30 20 39 34) メンバーにメールで周知した方がいいかな~? -- だるい (2009-12-03 22 01 52) このままだと、バーテンさんと二人で工場見学だね・・・ -- タツ (2009-12-09 12 02 53) それも、ありだねwwwというか、まだメール出してない! -- だるい (2009-12-09 23 36 32) 予定書いたよ~ -- アキラ (2009-12-12 21 25 40) ありがとう~ -- だるい (2009-12-13 00 16 42) 引っ越しの準備があるからいけないかも・・・ -- アキラ (2009-12-23 17 14 39) 今回見送りでもいいよ~。一応近場の日にちになったらまたよろ。 -- だるい (2009-12-23 23 40 17) 予定は書いたけど、つい最近になって無理な事がわかってきたよ! -- ハヤブサ (2010-01-06 19 57 53) 何があったんだい?! -- だるい (2010-01-06 21 16 12) 名前 コメント