num4anova 0.0.10-java → 0.0.11-java

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: 3dc8b0870b6c837111c8c59d391502dcea83fa1bb055834ccbe89823d24ba64a
-  data.tar.gz: d079fbc907bb2b0f72dc79affb51441efbbad8973842703194dac216be783e0b
+  metadata.gz: 2a278a4c32d7e1ef21ccbb1200573d5c1b4e326c59602327f9968afb29f134b6
+  data.tar.gz: e8520453d70e0276e6bb0587aefcd31b90b84d703cf670ae25297af73172bcdd
 SHA512:
-  metadata.gz: 2ab2456e85fa85bb45fe021e5e6606353f7d957874ac6f5fe8f335ab78a4449c50f866ce5b8af14c5cfb5ece7b61bffc700c499d584e0d16df14c1d4e2370ab2
-  data.tar.gz: 0e43ed4956da47b8964f4f129ef27b46333c18f4c1cd84af0826f7f533ca7df185e2e9af83ce4cea202ad15d2115e4ed80c4335adfb7cf69654f39fbfd430af5
+  metadata.gz: 42836d15f6460c2650a7c6cb17c15de206bbabb52c40d988714fe26564d019974a416db4c22f67ed0c535694022575d380603da7c029f0b04476d4994ffca7a5
+  data.tar.gz: ed1698ed0b05da8d2f0d7417fd1271bcb41754d76fa68b19fb300245449a634c830636ea790a49b89d87066c320c55e2260464bb791ba795f8193664a0babb28

data/CHANGELOG.md

@@ -2,6 +2,11 @@
 
 ## Unreleased
 
+## [0.0.11] - 2024-03-21
+
+### add
+- add fuction of difference_test.
+
 ## [0.0.10] - 2024-03-05
 
 ### add

data/ext/num4anova/Ancova.java

@@ -17,6 +17,12 @@ public class Ancova {
         double statistic = hypoth.calcTestStatistic(xi);
         return hypoth.executeTest(statistic, a);
     }
+    public boolean differenceTest(double[][][] xi, double a) {
+        HypothesisTest hypoth = new DifferenceTest();
+
+        double statistic = hypoth.calcTestStatistic(xi);
+        return hypoth.executeTest(statistic, a);
+    }
     /*********************************/
     /* interface define              */
     /*********************************/
@@ -36,34 +42,54 @@ public class Ancova {
             }
             return sum;
         }
-        protected double calcSex(double[][][] xi, int sumn) {
+        // 全変動
+        private double calcSty(double[][][] xi, int sumn) {
+            double sumy2 = calcSumy2(xi);
+            double sumy = calcSumy(xi);
+
+            return sumy2 - sumy*sumy / sumn;
+        }
+        private double calcStx(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 sumx2 - sumx*sumx / sumn;
+        }
+        private double calcStyx(double[][][] xi, int sumn) {
+            double sumx = calcSumx(xi);
+            double sumy = calcSumy(xi);
+            double sumyx = calcSumyx(xi);
 
-            return sumtx - sumax;
+            return sumyx - sumy*sumx / sumn;
         }
-        protected double calcSey(double[][][] xi, int sumn) {
-            double sumy2 = calcSumy2(xi);
+        // 水準間変動
+        private double calcSay(double[][][] xi, int sumn) {
             double sumy = calcSumy(xi);
 
-            double sumay = calcSumay(xi) - sumy*sumy / sumn;
-            double sumty = sumy2 - sumy*sumy / sumn;
+            return calcSumay(xi) - sumy*sumy / sumn;
+        }
+        private double calcSax(double[][][] xi, int sumn) {
+            double sumx = calcSumx(xi);
 
-            return sumty - sumay;
+            return calcSumax(xi) - sumx*sumx / sumn;
         }
-        protected double calcSeyx(double[][][] xi, int sumn) {
+        private double calcSayx(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;
+            return calcSumayx(xi) - sumy*sumx / sumn;
+        }
+        // 水準内変動
+        protected double calcSex(double[][][] xi, int sumn) {
+            return calcStx(xi, sumn) - calcSax(xi, sumn);
+        }
+        protected double calcSey(double[][][] xi, int sumn) {
+            return calcSty(xi, sumn) - calcSay(xi, sumn);
         }
+        protected double calcSeyx(double[][][] xi, int sumn) {
+            return calcStyx(xi, sumn) - calcSayx(xi, sumn);
+        }
+
         // 平行性の検定
         protected double calcbx(double[][][] xi) {
             double sum = 0.0;
@@ -89,8 +115,20 @@ public class Ancova {
             }
             return sum;
         }
+        // 差の検定
+        protected double calcSa(double[][][] xi, int sumn) {
+            double sumty = calcSty(xi, sumn);
+            double sumtyx = calcStyx(xi, sumn);
+            double sumtx  = calcStx(xi, sumn);
+            double sumey  = calcSey(xi, sumn);
+            double sumeyx = calcSeyx(xi, sumn);
+            double sumex  = calcSex(xi, sumn);
 
+            return (sumty - sumtyx * sumtyx / sumtx)
+                 - (sumey - sumeyx * sumeyx / sumex);
+        }
 
+        // ETC
         private double calcSumay(double[][][] xi) {
             double sum = 0.0;
 
@@ -157,7 +195,6 @@ public class Ancova {
             }
             return sum;
         }
-        // 水準間変動
         private double calcSumax(double[][][] xi) {
             double sum = 0.0;
 
@@ -180,6 +217,7 @@ public class Ancova {
             }
             return sum;
         }
+
     }
     // 回帰直線モデルの平行性の検定
     private class Parallettest extends RegressionLine implements HypothesisTest {
@@ -232,6 +270,7 @@ public class Ancova {
 
             double vr = calcVr(xi, sumn);
             double ve = calcVe(xi, sumn);
+
             return vr / ve;
         }
         public boolean executeTest(double statistic, double a) {
@@ -251,6 +290,34 @@ public class Ancova {
             double sumex = calcSex(xi, sumn);
             double sumeyx = calcSeyx(xi, sumn);
 
+            return (sumey * sumex - sumeyx * sumeyx) / (m * sumex);
+        }
+    }
+    // 水準間の差の検定
+    private class DifferenceTest 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 - xi.length - 1;
+
+            double va = calcSa(xi, sumn) / n;
+            double ve = calcVe(xi, sumn);
+
+            return va / 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 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

@@ -256,7 +256,7 @@ module Num4AnovaLib
         end
         # 回帰直線の有意性検定
         #
-        # @overload significance_testt(xi, a)
+        # @overload significance_test(xi, a)
         #   @param [array]  xi データ(double[][][])
         #   @param [double] a  有意水準
         #   @return [boolean]  検定結果(boolean true:棄却域内 false:棄却域外)
@@ -284,6 +284,36 @@ module Num4AnovaLib
         def significance_test(xi, a)
             @ancova.significanceTest(xi.to_java(Java::double[][]), a)
         end
+        # 水準間の差の検定
+        #
+        # @overload difference_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.difference_test(xi, 0.05)
+        #    => true
+        def difference_test(xi, a)
+            @ancova.differenceTest(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.10
+  version: 0.0.11
 platform: java
 authors:
 - siranovel
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2024-03-05 00:00:00.000000000 Z
+date: 2024-03-21 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake