hstatistics 0.2.5.1 → 0.2.5.2
raw patch · 8 files changed
+17/−16 lines, 8 filesPVP: minor bump suggested
API additions: PVP suggests at least a minor version bump
API changes (from Hackage documentation)
+ Numeric.Statistics.PCA: pcaReduceN :: Array Int (Vector Double) -> Int -> Array Int (Vector Double)
Files
- CHANGES +3/−0
- hstatistics.cabal +1/−1
- lib/Numeric/Statistics.hs +4/−6
- lib/Numeric/Statistics/ICA.hs +4/−4
- lib/Numeric/Statistics/Information.hs +1/−1
- lib/Numeric/Statistics/PCA.hs +2/−2
- lib/Numeric/Statistics/PDF.hs +1/−1
- lib/Numeric/Statistics/Surrogate.hs +1/−1
CHANGES view
@@ -100,3 +100,6 @@ 0.2.5.1: added pcaReduceN to PCA++0.2.5.2:+ exposed pcaReduceN as requested by Tom Nielsen
hstatistics.cabal view
@@ -1,5 +1,5 @@ Name: hstatistics-Version: 0.2.5.1+Version: 0.2.5.2 License: BSD3 License-file: LICENSE Copyright: (c) A.V.H. McPhail 2010, 2011, 2012, 2013
lib/Numeric/Statistics.hs view
@@ -31,8 +31,6 @@ ----------------------------------------------------------------------------- ---import Debug.Trace- --import Numeric.Vector --import Numeric.Matrix --import Numeric.Container@@ -132,10 +130,10 @@ cut v c = let c' = sort c in mapVector (\x -> cut_helper 0 x c') v where- cut_helper i x c - | i >= dim c = error "Numeric.Statistics: cut: data point not within interval"- | x >= (c @> i) && x <= (c @> (i+1)) = i- | otherwise = cut_helper (i + 1) x c+ cut_helper j x d + | j >= dim d = error "Numeric.Statistics: cut: data point not within interval"+ | x >= (d @> j) && x <= (d @> (j+1)) = j+ | otherwise = cut_helper (j + 1) x d -----------------------------------------------------------------------------
lib/Numeric/Statistics/ICA.hs view
@@ -2,7 +2,7 @@ -- | -- Module : Numeric.Statistics.ICA -- Copyright : (c) A. V. H. McPhail 2010--- License : GPL-style+-- License : BSD3 -- -- Maintainer : haskell.vivian.mcphail <at> gmail <dot> com -- Stability : provisional@@ -176,11 +176,11 @@ -> Int -- ^ sampling size (must be smaller than length of data) -> I.Array Int (Vector Double) -- ^ data -> (I.Array Int (Vector Double),Matrix Double) -- ^ transformed data, ica transform-ica r g g' n t s a = let i = I.rangeSize $ I.bounds a- w = random_vector r (i,i)+ica r g g' n t s a = let j = I.rangeSize $ I.bounds a+ w = random_vector r (j,j) x' = fromRows $ I.elems a -- next line is BAD if distribution not stationary- x = concat $ toBlocksEvery i s x'+ x = concat $ toBlocksEvery j s x' w' = ica' g g' n t w x y = w' <> x' in (I.listArray (1,1) $ toRows y,w')
lib/Numeric/Statistics/Information.hs view
@@ -3,7 +3,7 @@ -- | -- Module : Numeric.Statistics.Information -- Copyright : (c) A. V. H. McPhail 2010--- License : GPL-style+-- License : BSD3 -- -- Maintainer : haskell.vivian.mcphail <at> gmail <dot> com -- Stability : provisional
lib/Numeric/Statistics/PCA.hs view
@@ -2,7 +2,7 @@ -- | -- Module : Numeric.Statistics.PCA -- Copyright : (c) A. V. H. McPhail 2010--- License : GPL-style+-- License : BSD3 -- -- Maintainer : haskell.vivian.mcphail <at> gmail <dot> com -- Stability : provisional@@ -13,7 +13,7 @@ ----------------------------------------------------------------------------- module Numeric.Statistics.PCA (- pca, pcaN, pcaTransform, pcaReduce+ pca, pcaN, pcaTransform, pcaReduce, pcaReduceN ) where
lib/Numeric/Statistics/PDF.hs view
@@ -4,7 +4,7 @@ -- | -- Module : Numeric.Statistics.PDF -- Copyright : (c) A. V. H. McPhail 2010--- License : GPL-style+-- License : BSD3 -- -- Maintainer : haskell.vivian.mcphail <at> gmail <dot> com -- Stability : provisional
lib/Numeric/Statistics/Surrogate.hs view
@@ -2,7 +2,7 @@ -- | -- Module : Numeric.Statistics.Surrogate -- Copyright : (c) Alexander Vivian Hugh McPhail 2010--- License : GPL-style+-- License : BSD3 -- -- Maintainer : haskell.vivian.mcphail <at> gmail <dot> com -- Stability : provisional