search for: distfunc

...quot;) # Arbitrarily assigning NA to some elements mtcars[2,2] <- "NA" mtcars[6,7] <- "NA" mydata <- mtcars hclustfunc <- function(x) hclust(x, method="complete") # Initially I wanted to use this but it didn't take NA #distfunc <- function(x) dist(x,method="euclidean") # Try using daisy GOWER function # which suppose to work with NA value distfunc <- function(x) daisy(x,metric="gower") d <- distfunc(mydata) fit <- hclustfunc(d) # Perform clustering heatmap hea...