@@ -1,6 +1,6 @@

 Package: FuseSOM

 Title: A Correlation Based Multiview Self Organizing Maps Clustering For IMC Datasets

-Version: 0.99.8

+Version: 0.99.9

 Authors@R: 

     person("Elijah", "Willie", , "[email protected]", role = c("aut", "cre"))

 Description: A correlation-based multiview self-organizing map for the characterization of cell types in highly multiplexed in situ imaging cytometry assays (`FuseSOM`) 

@@ -211,9 +211,11 @@ clusterPrototypes <- function(somModel, numClusters = NULL) {

   pear <- cor(t(prototypes), method = "pearson")

   cosi <- tcosine(prototypes)

   spear <- cor(t(prototypes), method = "spearman")

+  eucl <- dist(prototypes)

   # peform multiview integration

-  finalDist <- as.matrix(fuse(cor2dist(pear), cor2dist(cosi), cor2dist(spear)))

+  finalDist <- as.matrix(fuse(cor2dist(pear), cor2dist(cosi), cor2dist(spear)),

+                         eucl)

   # cluster the final

   clusters <- HierarchicalClustering(finalDist,