diff --git a/.~lock.Schrick-Noah_CS-6643_Lab-4.docx# b/.~lock.Schrick-Noah_CS-6643_Lab-4.docx#
index 1ed054f..f149018 100644
--- a/.~lock.Schrick-Noah_CS-6643_Lab-4.docx#
+++ b/.~lock.Schrick-Noah_CS-6643_Lab-4.docx#
@@ -1 +1 @@
-,noah,NovaArchSys,30.09.2022 12:27,file:///home/noah/.config/libreoffice/4;
\ No newline at end of file
+,noah,NovaArchSys,30.09.2022 12:52,file:///home/noah/.config/libreoffice/4;
\ No newline at end of file
diff --git a/Schrick-Noah_CS-6643_Lab-4.R b/Schrick-Noah_CS-6643_Lab-4.R
index 1767a9c..2b968c7 100644
--- a/Schrick-Noah_CS-6643_Lab-4.R
+++ b/Schrick-Noah_CS-6643_Lab-4.R
@@ -138,4 +138,11 @@ top_genes <- as.character(ttest_allgene.sorted[1:top_cutoff,1])
 write.table(top_genes, sep="\t", file="", quote=F, row.names=F, col.names=F)
 
 
-#### Optional 1: Identify Outliers
\ No newline at end of file
+#### Optional 1: Identify Outliers
+mddCorr<-cor(GxS.covfilter)  # distance based on correlation
+d <- sqrt(1-mddCorr)
+dim(d)
+rownames(d)
+mddTree = hclust(as.dist(d))
+mddTree$labels <- phenos.df$X
+plot(mddTree)
diff --git a/Schrick-Noah_CS-6643_Lab-4.docx b/Schrick-Noah_CS-6643_Lab-4.docx
index 2de4885..051562c 100644
Binary files a/Schrick-Noah_CS-6643_Lab-4.docx and b/Schrick-Noah_CS-6643_Lab-4.docx differ