From 46758e5ea9d91bb6f5d64531f87b956991063e92 Mon Sep 17 00:00:00 2001
From: Ben Anderson <b.anderson@soton.ac.uk>
Date: Tue, 9 Jun 2015 13:32:32 +0100
Subject: [PATCH] updated comments

---
 Census2022-CER_regP_48_CLUSTER_std-1-5-15.R | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Census2022-CER_regP_48_CLUSTER_std-1-5-15.R b/Census2022-CER_regP_48_CLUSTER_std-1-5-15.R
index 5a2fa6f..dc9fd68 100755
--- a/Census2022-CER_regP_48_CLUSTER_std-1-5-15.R
+++ b/Census2022-CER_regP_48_CLUSTER_std-1-5-15.R
@@ -125,6 +125,7 @@ stddata = mydatam[,177:224]
 stddata = na.omit(stddata)
 stddata = scale(stddata)   ## make mean 0, stdev 1
 
+## k means clustering
 ## partitioning by a plot of the within groups sum of squares (WSS) by number of clusters extracted (looking for a bend in the plot, http://www.statmethods.net/advstats/cluster.html)
 ## wss <- (nrow(mydata)-1)*sum(apply(mydata,2,var))
 wss <- (nrow(stddata)-1)*sum(apply(stddata,2,var))
-- 
GitLab