Merge branch 'dev-phylo' into dev-merge

8237d093 · Alexandre Delanoë · b88a8088 · 5d618e53 · 8237d093
Commit 8237d093 authored Sep 03, 2019 by Alexandre Delanoë
Hide whitespace changes
Inline Side-by-side

Showing with 4 additions and 3 deletions

TemporalMatching.hs src/Gargantext/Viz/Phylo/TemporalMatching.hs +4 -3

No files found.
--- a/src/Gargantext/Viz/Phylo/TemporalMatching.hs
+++ b/src/Gargantext/Viz/Phylo/TemporalMatching.hs
@@ -213,9 +213,10 @@ entropy branches =
 homogeneity :: [[PhyloGroup]] -> Double
-homogeneity branches = undefined
+homogeneity _ = undefined
-    where 
+    -- where 
-        branchCov :: 
+    --     branchCov :: [PhyloGroup] -> Int -> Double
+    --     branchCov branch total = (fromIntegral $ length branch) / (fromIntegral total) 
 toPhyloQuality :: [[PhyloGroup]] -> Double