in clustering synchronique change to 1 / sensibility

src/Gargantext/Core/Viz/AdaptativePhylo.hs

@@ -146,7 +146,7 @@ defaultConfig =
             , phyloProximity = WeightedLogJaccard 10
             , seaElevation   = Constante 0.1 0.1
             , findAncestors  = True
-            , phyloSynchrony = ByProximityThreshold 0.5 10 SiblingBranches MergeAllGroups
+            , phyloSynchrony = ByProximityThreshold 0.2 10 SiblingBranches MergeAllGroups
             , phyloQuality   = Quality 0 1
             , timeUnit       = Year 3 1 5
             , clique         = MaxClique 0

src/Gargantext/Core/Viz/Phylo/SynchronicClustering.hs

@@ -135,7 +135,7 @@ groupsToEdges prox sync nbDocs diago groups =
         toEdges sens edges = 
             case prox of
                 WeightedLogJaccard _ -> map (\(g,g') -> 
-                                                     ((g,g'), weightedLogJaccard' sens nbDocs diago
+                                                     ((g,g'), weightedLogJaccard' (1 / sens) nbDocs diago
                                                                   (g ^. phylo_groupNgrams) (g' ^. phylo_groupNgrams))) edges
                 _ -> undefined