num4anova 0.0.8-java → 0.0.10-java

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: c95aa4643ccb4e0c51bcead18e37bf5561ecadd7ea0fe67a1ed0ee332aab3229
-  data.tar.gz: 47045f21d6b1774ebf1435c6397852b6f567bf69fe1d001091cd4aa164a0756e
+  metadata.gz: 3dc8b0870b6c837111c8c59d391502dcea83fa1bb055834ccbe89823d24ba64a
+  data.tar.gz: d079fbc907bb2b0f72dc79affb51441efbbad8973842703194dac216be783e0b
 SHA512:
-  metadata.gz: 5367576d7d8d9130c182eed316807b2b7393f3df7cabc9f95c441aced071b39f229e3f5e76a5307e619d399cafd27d4492e4d29049a0cd45475936df386ef647
-  data.tar.gz: 3f23540f51ca938baa190c4b85a9e9aa6178d386ac0a66b7047cff877fb32b422d3f21ad7d42daa7a14ef4514901a8287f54b11b5b7fddef37e80d65f0c8fbe5
+  metadata.gz: 2ab2456e85fa85bb45fe021e5e6606353f7d957874ac6f5fe8f335ab78a4449c50f866ce5b8af14c5cfb5ece7b61bffc700c499d584e0d16df14c1d4e2370ab2
+  data.tar.gz: 0e43ed4956da47b8964f4f129ef27b46333c18f4c1cd84af0826f7f533ca7df185e2e9af83ce4cea202ad15d2115e4ed80c4335adfb7cf69654f39fbfd430af5

data/CHANGELOG.md

@@ -2,6 +2,16 @@
 
 ## Unreleased
 
+## [0.0.10] - 2024-03-05
+
+### add
+- add fuction of significance_test.
+
+## [0.0.9] - 2024-03-02
+
+### add
+- add fuction of parallel_test.
+
 ## [0.0.6] - 2024-02-04
 
 ### add

data/ext/num4anova/Ancova.java

@@ -0,0 +1,258 @@
+import org.apache.commons.math3.distribution.FDistribution;
+
+public class Ancova {
+    private static Ancova ancova = new Ancova();
+    public static Ancova getInstance() {
+        return ancova;
+    }
+    public boolean parallelTest(double[][][] xi, double a) {
+        HypothesisTest hypoth = new Parallettest();
+
+        double statistic = hypoth.calcTestStatistic(xi);
+        return hypoth.executeTest(statistic, a);
+    }
+    public boolean significanceTest(double[][][] xi, double a) {
+        HypothesisTest hypoth = new SignificanceTest();
+
+        double statistic = hypoth.calcTestStatistic(xi);
+        return hypoth.executeTest(statistic, a);
+    }
+    /*********************************/
+    /* interface define              */
+    /*********************************/
+    private interface HypothesisTest {
+        double calcTestStatistic(double[][][] xi);
+        boolean executeTest(double statistic, double a);
+    }
+    /*********************************/
+    /* class define                  */
+    /*********************************/
+    private class RegressionLine {
+        protected int calcSumn(double[][][] xi) {
+            int sum = 0;
+
+            for(int i = 0; i < xi.length; i++) {
+                sum += xi[i].length;
+            }
+            return sum;
+        }
+        protected double calcSex(double[][][] xi, int sumn) {
+            double sumx2 = calcSumx2(xi);
+            double sumx = calcSumx(xi);
+
+            double sumtx = sumx2 - sumx*sumx / sumn;
+            double sumax = calcSumax(xi) - sumx*sumx / sumn;
+
+            return sumtx - sumax;
+        }
+        protected double calcSey(double[][][] xi, int sumn) {
+            double sumy2 = calcSumy2(xi);
+            double sumy = calcSumy(xi);
+
+            double sumay = calcSumay(xi) - sumy*sumy / sumn;
+            double sumty = sumy2 - sumy*sumy / sumn;
+
+            return sumty - sumay;
+        }
+        protected double calcSeyx(double[][][] xi, int sumn) {
+            double sumx = calcSumx(xi);
+            double sumy = calcSumy(xi);
+            double sumyx = calcSumyx(xi);
+
+            double sumayx = calcSumayx(xi) - sumy*sumx / sumn;
+            double sumtyx = sumyx - sumy*sumx / sumn;
+
+            return sumtyx - sumayx;
+        }
+        // 平行性の検定
+        protected double calcbx(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                int n = xi[i].length;
+                double sumx = 0.0;
+                double sumy = 0.0;
+                double sumyx = 0.0;
+                double sumx2 = 0.0;
+                for (int j = 0; j < n; j++) {
+                    sumx +=  xi[i][j][1];
+                    sumy +=  xi[i][j][0];
+                    sumyx += xi[i][j][1] * xi[i][j][0];
+
+                    sumx2 += xi[i][j][1] * xi[i][j][1];
+
+                }
+                double wki = n * sumyx - sumy * sumx;
+                double wk = wki * wki / (n * (n * sumx2 - sumx * sumx));
+
+                sum += wk;
+            }
+            return sum;
+        }
+
+
+        private double calcSumay(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                double sumyi = 0.0;
+                for (int j = 0; j < xi[i].length; j++) {
+                    sumyi += xi[i][j][0];
+                }
+                sum += sumyi * sumyi / xi[i].length;
+            }
+            return sum;
+        }
+        private double calcSumy2(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                for (int j = 0; j < xi[i].length; j++) {
+                    sum += xi[i][j][0] * xi[i][j][0];
+                }
+            }
+            return sum;
+        }
+        private double calcSumx(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                for (int j = 0; j < xi[i].length; j++) {
+                    sum += xi[i][j][1];
+                }
+            }
+            return sum;
+        }
+        protected double calcSumx2(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                for (int j = 0; j < xi[i].length; j++) {
+                    sum += xi[i][j][1] * xi[i][j][1];
+                }
+            }
+            return sum;
+        }
+        protected double calcSumyx(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                for (int j = 0; j < xi[i].length; j++) {
+                    sum += xi[i][j][0] * xi[i][j][1];
+                }
+            }
+            return sum;
+        }
+        private double calcSumayx(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                double sumxi = 0.0;
+                double sumyi = 0.0;
+                for (int j = 0; j < xi[i].length; j++) {
+                    sumxi += xi[i][j][1];
+                    sumyi += xi[i][j][0];
+                }
+                sum += sumxi * sumyi / xi[i].length;
+            }
+            return sum;
+        }
+        // 水準間変動
+        private double calcSumax(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                double sumxi = 0.0;
+                for (int j = 0; j < xi[i].length; j++) {
+                    sumxi += xi[i][j][1];
+                }
+                sum += sumxi * sumxi / xi[i].length;
+            }
+            return sum;
+        }
+        private double calcSumy(double[][][] xi) {
+            double sum = 0.0;
+
+            for (int i = 0; i < xi.length; i++) {
+                for (int j = 0; j < xi[i].length; j++) {
+                    sum += xi[i][j][0];
+                }
+            }
+            return sum;
+        }
+    }
+    // 回帰直線モデルの平行性の検定
+    private class Parallettest extends RegressionLine implements HypothesisTest {
+        private int n = 0;
+        private int m = 0;
+        public double calcTestStatistic(double[][][] xi) {
+            int sumn = calcSumn(xi);
+            n = xi.length - 1;
+            m = sumn - 2 * xi.length;
+ 
+            double vnp = calcVnp(xi, sumn);
+            double ve2 = calcVe2(xi, sumn);
+
+            return vnp / ve2;
+        }
+        private double calcVnp(double[][][] xi, int sumn){
+            return calcSnp(xi, sumn) / n;
+        }
+        private double calcSnp(double[][][] xi, int sumn) {
+            double sumbx = calcbx(xi);
+            double sumeyx = calcSeyx(xi, sumn);
+            double sumex = calcSex(xi, sumn);
+
+            return sumbx - sumeyx * sumeyx / sumex;
+        }
+        private double calcVe2(double[][][] xi, int sumn) {
+            return calcSe2(xi, sumn) / m;
+        }
+        private double calcSe2(double[][][] xi, int sumn) {
+            double sumey = calcSey(xi, sumn);
+            double sumbx = calcbx(xi);
+
+            return sumey - sumbx;
+        }
+        public boolean executeTest(double statistic, double a) {
+            FDistribution fDist = new FDistribution(n, m);
+            double f = fDist.inverseCumulativeProbability(1.0 - a);
+
+            return (statistic >= f) ? true : false;
+        }
+    }
+    // 回帰直線モデルの平行性の検定
+    private class SignificanceTest extends RegressionLine implements HypothesisTest {
+        private int n = 0;
+        private int m = 0;
+        public double calcTestStatistic(double[][][] xi) {
+            int sumn = calcSumn(xi);
+            n = 1;
+            m = sumn - xi.length - 1;
+
+            double vr = calcVr(xi, sumn);
+            double ve = calcVe(xi, sumn);
+            return vr / ve;
+        }
+        public boolean executeTest(double statistic, double a) {
+            FDistribution fDist = new FDistribution(n, m);
+            double f = fDist.inverseCumulativeProbability(1.0 - a);
+
+            return (statistic >= f) ? true : false;
+        }
+        private double calcVr(double[][][] xi, int sumn) {
+            double sumeyx = calcSeyx(xi, sumn);
+            double sumex = calcSex(xi, sumn);
+
+            return (sumeyx * sumeyx) / sumex;
+        }
+        private double calcVe(double[][][] xi, int sumn) {
+            double sumey = calcSey(xi, sumn);
+            double sumex = calcSex(xi, sumn);
+            double sumeyx = calcSeyx(xi, sumn);
+
+            return (sumey * sumex - sumeyx * sumeyx) / (m * sumex);
+        }
+    }
+}
+

data/lib/num4anova.rb

@@ -5,6 +5,7 @@ require 'commons-math3-3.6.1.jar'
 
 java_import 'OneWayLayout'
 java_import 'TwoWayLayout'
+java_import 'Ancova'
 java_import 'java.util.HashMap'
 # 分散分析を行う
 #  (Apache commoms math3使用)
@@ -218,5 +219,71 @@ module Num4AnovaLib
             return ret.to_a
         end        
     end
+    # 共分散分析
+    class Num4AncovaLib
+        def initialize
+            @ancova = Ancova.getInstance()
+        end
+        # 回帰直線の平行性検定
+        #
+        # @overload parallel_test(xi, a)
+        #   @param [array]  xi データ(double[][][])
+        #   @param [double] a  有意水準
+        #   @return [boolean]  検定結果(boolean true:棄却域内 false:棄却域外)
+        # @example
+        #   xi = [
+        #      [
+        #          [3,35], [5,38], [3,39],
+        #      ],
+        #      [
+        #          [3,36], [3,39], [8,54],
+        #      ],
+        #      [
+        #          [2,40], [2,45], [2,39],
+        #      ],
+        #      [
+        #          [3,47], [4,52], [2,48],
+        #      ],
+        #      [
+        #          [1,64], [2,80], [0,70],
+        #      ],
+        #    ]
+        #    ancova = Num4AnovaLib::Num4AncovaLib.new
+        #    ancova.parallel_test(xi, 0.05)
+        #    => false
+        def parallel_test(xi, a)
+            @ancova.parallelTest(xi.to_java(Java::double[][]), a)
+        end
+        # 回帰直線の有意性検定
+        #
+        # @overload significance_testt(xi, a)
+        #   @param [array]  xi データ(double[][][])
+        #   @param [double] a  有意水準
+        #   @return [boolean]  検定結果(boolean true:棄却域内 false:棄却域外)
+        # @example
+        #   xi = [
+        #      [
+        #          [3,35], [5,38], [3,39],
+        #      ],
+        #      [
+        #          [3,36], [3,39], [8,54],
+        #      ],
+        #      [
+        #          [2,40], [2,45], [2,39],
+        #      ],
+        #      [
+        #          [3,47], [4,52], [2,48],
+        #      ],
+        #      [
+        #          [1,64], [2,80], [0,70],
+        #      ],
+        #    ]
+        #    ancova = Num4AnovaLib::Num4AncovaLib.new
+        #    ancova.significance_test(xi, 0.05)
+        #    => true
+        def significance_test(xi, a)
+            @ancova.significanceTest(xi.to_java(Java::double[][]), a)
+        end
+    end
 end
 

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: num4anova
 version: !ruby/object:Gem::Version
-  version: 0.0.8
+  version: 0.0.10
 platform: java
 authors:
 - siranovel
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2024-02-04 00:00:00.000000000 Z
+date: 2024-03-05 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake
@@ -61,6 +61,7 @@ files:
 - Gemfile
 - LICENSE
 - Rakefile
+- ext/num4anova/Ancova.java
 - ext/num4anova/MultiComp.java
 - ext/num4anova/OneWayLayout.java
 - ext/num4anova/TwoWayLayout.java