Examples of doub()

Examples of com.nr.ran.Ran.doub()

128
129
130
131
132
133
134
135
136
137
138
    m=0.5;s=1.5;
    Normaldist normc = new Normaldist(m,s);
    Ran myran = new Ran(17);
    sbeps=5.0e-14;
    for (i=0;i<1000;i++) {
      u=m-3.0*s+6.0*s*myran.doub();
      a=normc.cdf(u);
      b=normc.invcdf(a);
//      System.out.printf(setprecision(15) << u << " %f\n", b << " %f\n", abs(u-b));
      localflag = localflag || abs(u-b) > sbeps;
    }
View Full Code Here

Examples of com.nr.ran.Ran.doub()

31
32
33
34
35
36
37
38
39
40
41
    ranvec(b);
    b=vecadd(b,u);
    ranvec(c);
    ranvec(r);
    Ran myran = new Ran(17);
    alpha=myran.doub();
    beta=myran.doub();

   

    // Test cyclic
View Full Code Here

Examples of com.nr.ran.Ran.doub()

32
33
34
35
36
37
38
39
40
41
42
    b=vecadd(b,u);
    ranvec(c);
    ranvec(r);
    Ran myran = new Ran(17);
    alpha=myran.doub();
    beta=myran.doub();

   

    // Test cyclic
    System.out.println("Testing cyclic");
View Full Code Here

Examples of com.nr.ran.Ran.doub()

124
125
126
127
128
129
130
131
132
133
134
    Expondist normc=new Expondist(beta);
    Ran myran=new Ran(17);
    sbeps=5.0e-14;
    localflag=false;
    for (i=0;i<1000;i++) {
      u=3.0*myran.doub();
      a=normc.cdf(u);
      b=normc.invcdf(a);
//      if (abs(u-b) > sbeps) {
//        System.out.printf(setprecision(15) << u << " %f\n", b << " %f\n", abs(u-b));
//      }
View Full Code Here

Examples of com.nr.ran.Ran.doub()

145
146
147
148
149
150
151
152
153
154
155
    Logisticdist normc = new Logisticdist(m,s);
    Ran myran = new Ran(17);
    sbeps=5.0e-14;
    localflag=false;
    for (i=0;i<1000;i++) {
      u=m-3.0*s+6.0*s*myran.doub();
      a=normc.cdf(u);
      b=normc.invcdf(a);
//      if (abs(u-b) > sbeps) {
//        System.out.printf(setprecision(15) << u << " %f\n", b << " %f\n", abs(u-b));
//      }
View Full Code Here

Examples of com.nr.ran.Ran.doub()

131
132
133
134
135
136
137
138
139
140
141
    Betadist normc = new Betadist(alpha,beta);
    Ran myran = new Ran(17);
    sbeps=5.0e-14;
    localflag=false;
    for (i=0;i<1000;i++) {
      u=myran.doub();
      a=normc.cdf(u);
      b=normc.invcdf(a);
//      if (abs(u-b) > sbeps) {
//        System.out.printf(setprecision(15) << u << " %f\n", b << " %f\n", abs(u-b));
//      }
View Full Code Here

Examples of com.nr.ran.Ran.doub()

33
34
35
36
37
38
39
40
41
42
43
    // Test invxlogx
    System.out.println("Testing invxlogx");

    Ran myran = new Ran(17);
    for (i=0;i<N;i++) {
      y1 = -exp(-1.0)*myran.doub();
//      System.out.printf(setprecision(17) << y1;
      x=invxlogx(y1);
      y2=x*log(x);
//      System.out.println(" %f\n", x << " %f\n", y2);

View Full Code Here

Examples of com.nr.ran.Ran.doub()

136
137
138
139
140
141
142
143
144
145
146
    Fdist normc=new Fdist(nu1,nu2);
    Ran myran = new Ran(17);
    sbeps=5.0e-14;
    localflag=false;
    for (i=0;i<1000;i++) {
      u=3.0*myran.doub();
      a=normc.cdf(u);
      b=normc.invcdf(a);
//      if (abs(u-b) > sbeps) {
//        System.out.printf(setprecision(15) << u << " %f\n", b << " %f\n", abs(u-b));
//      }
View Full Code Here

Examples of com.nr.ran.Ran.doub()

34
35
36
37
38
39
40
41
42
43
44
    // Test Fitmed
    System.out.println("Testing Fitmed");

    Ran myran = new Ran(17);
    for (i=0;i<N;i++) {
      x[i]=10.0*myran.doub();
      y[i]=sqrt(2.0)+pi*x[i];
    }

    Fitmed fit1 = new Fitmed(x,y);   // Perfect fit, no noise

View Full Code Here

Examples of com.nr.ran.Ran.doub()

34
35
36
37
38
39
40
41
42
43
44
    System.out.println("Testing Fitab");

    Ran myran =new Ran(17);
    sumx2=0;
    for (i=0;i<N;i++) {
      x[i]=10.0*myran.doub();
      y[i]=sqrt(2.0)+pi*x[i];
      sig[i]=1.0;
      sumx2 += SQR(x[i]);
    }

View Full Code Here
TOP
Copyright © 2018 www.massapi.com. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.