[FEAT] Infomap clustering

src/Gargantext/Components/Forest/Tree/Node/Action/Update.purs

@@ -90,7 +90,7 @@ updateGraphCpt = here.component "updateGraph" cpt where
                                  , default: methodGraphMetric'
                                  , callback: \val -> T.write_ val methodGraphMetric
                                  , print: show } []
-                 , formChoiceSafe { items: [Spinglass, Confluence]
+                 , formChoiceSafe { items: [Infomap, Spinglass, Confluence]
                                  , default: methodGraphClustering'
                                  , callback: \val -> T.write_ val methodGraphClustering
                                  , print: show } []

src/Gargantext/Components/Forest/Tree/Node/Action/Update/Types.purs

@@ -71,7 +71,7 @@ instance Read GraphMetric where
 instance JSON.ReadForeign GraphMetric where readImpl = JSONG.enumSumRep
 instance JSON.WriteForeign GraphMetric where writeImpl = JSON.writeImpl <<< show
 
-data PartitionMethod = Spinglass | Confluence
+data PartitionMethod = Spinglass | Infomap | Confluence
 derive instance Generic PartitionMethod _
 derive instance Eq PartitionMethod
 instance Show PartitionMethod where show = genericShow