/* K-MEANS ALGORITHM PSEUDO: Initialization: - set all centroids (midpoints for each cluster k) near the middle of the scattered plot Main loop: - connect each data point with the nearest centroid and assign it to the corresponding cluster - set each centroid to the middle of its clusters data points -> reconnect each point with the closest centroid and assign it to the centroids cluster Methods: Initialization: setCentroids() Main loop: - connect(points,centroids) - changeCentroids() */ var s = 3; // sizeAdjustments var k = 2; // amount of clusters var randomRange = 100; // *1 data points var speed = 8; // higher = slower norm 8 var ppc = 2; // points per centroid in random plot randomRange*ppc/k var cents = 2; // centroids per random plot *k var iters; // total iterations var fps; // frames per second var w,h; setTimeout(function() {w=c.width;h=c.height;plot1(); mapDataPoints(points,"blue",s/1.2)},1); var it = it2 = 1; var errLim = 500; var centroids = []; var centroidPoints = []; var colors = []; var timeouts = []; var started; var xs,xe,ys,ye; var points; function plot1() { points =[ [71,28],[53,25],[65,27],[56,22],[55,25], [42,10],[59,20],[52,8],[31,34],[44,19], [49,40],[58,45],[44,22],[56,19],[47,43], [53,32],[46,35],[52,27],[57,26],[58,30], [43,23],[56,37],[55,18],[44,22],[59,32], [37,41],[64,29],[46,16],[46,23],[56,39], [34,45],[42,33],[51,39],[54,35],[56,29], [46,41],[50,24],[50,33],[39,37],[55,36], [58,41],[62,12],[37,21],[54,32],[63,22], [47,13],[58,24],[60,36],[81,31],[49,26], [20,10],[46,21],[45,26],[40,31],[51,36], [36,31],[47,55],[55,27],[59,6],[57,42], [60,32],[62,25],[53,23],[35,38],[48,20], [51,43],[42,39],[54,35],[49,32],[54,44], [52,24],[50,10],[49,41],[60,39],[54,20], [73,30],[62,40],[44,24],[61,39],[68,37], [35,5],[45,4],[56,8],[38,5],[53,5], [51,7],[49,6],[56,3],[48,4],[55,6], [52,5],[43,9],[45,7],[43,5],[49,8], [53,6],[51,5],[45,5],[53,2],[53,4], [52,6],[65,6],[49,5],[60,7],[45,4], [60,7],[35,5],[44,6],[57,6],[48,7], [48,7],[52,3],[41,6],[43,3],[39,6], [67,4],[33,5],[42,9],[56,4],[50,4], [43,8],[34,5],[47,6],[47,7],[29,8], [53,2],[53,3],[59,6],[45,4],[60,7], [57,5],[47,6],[36,5],[43,10],[46,5], [30,1],[31,8],[66,8],[74,6],[42,3], [38,6],[49,4],[43,6],[44,4],[74,6], [42,7],[64,4],[60,4],[52,4],[50,5], [44,1],[61,6],[45,2],[54,4],[47,4], [49,7],[56,4],[49,3],[51,5],[62,6], [64,5],[43,3],[51,4],[33,1],[60,2], [47,2],[39,5],[62,4],[61,9],[51,4], [41,4],[61,3],[50,6],[51,10],[52,4], [52,5],[31,3],[52,6],[36,9],[53,7], [50,4],[54,1],[26,3],[52,8],[37,7], [48,6],[47,5],[61,6],[59,8],[55,4], [45,4],[45,3],[53,5],[33,9],[45,5], [75,7],[33,3],[40,4],[60,2],[55,4], [35,6],[58,8],[47,2],[63,6],[48,9]]; xs=30,xe=75,ys=2,ye=50; iters = 10; fps = k*iters/speed; clear(); mapDataPoints(points,"blue",s/1.2); err = 0; } function plot2() { points =[ [11,9],[8,10],[8,11],[11,12],[10,10], [9,11],[11,11],[8,7],[10,12],[7,11], [11,10],[17,11],[11,13],[7,6],[10,10], [9,11],[11,15],[9,8],[14,9],[12,14], [12,11],[11,10],[13,13],[13,9],[9,10], [15,9],[11,11],[10,12],[8,7],[12,5], [10,12],[12,10],[11,6],[9,11],[10,8], [11,10],[10,9],[8,11],[8,9],[12,11], [11,8],[5,9],[11,9],[9,8],[9,10], [12,11],[8,9],[12,12],[9,10],[14,4], [13,26],[48,26],[45,28],[34,21],[34,44], [30,24],[35,31],[21,24],[35,20],[29,27], [38,30],[25,26],[33,16],[26,30],[37,25], [38,34],[24,41],[22,35],[17,40],[35,29], [19,17],[19,27],[26,24],[34,26],[36,28], [17,18],[30,18],[43,26],[21,16],[35,30], [30,18],[39,26],[25,28],[12,22],[18,32], [37,36],[30,20],[25,23],[26,28],[32,23], [21,29],[33,36],[32,39],[28,39],[29,37], [28,21],[16,24],[48,26],[38,42],[41,13], [70,73],[63,61],[70,51],[59,66],[70,56], [65,80],[69,67],[56,90],[62,50],[65,68], [67,44],[80,70],[47,72],[56,84],[40,99], [65,72],[87,45],[75,77],[84,85],[61,77], [73,56],[59,72],[72,58],[71,52],[66,73], [62,83],[41,60],[71,69],[97,75],[69,45], [68,72],[73,53],[84,62],[37,53],[84,57], [95,90],[82,72],[34,81],[82,80],[65,53], [60,59],[68,63],[54,62],[64,36],[61,68], [81,67],[45,63],[69,73],[80,47],[56,68]]; xs=5,xe=99,ys=2,ye=99; iters = 10;fps = k*iters/speed; clear(); mapDataPoints(points,"blue",s/1.2); err = 0; } function plot3() { points =[ [30,46],[31,21],[33,19],[14,45],[24,27], [25,31],[31,38],[35,30],[32,31],[26,15], [16,31],[17,26],[25,29],[23,28],[36,21], [35,38],[29,22],[25,32],[21,33],[39,27], [35,30],[37,31],[16,33],[33,28],[31,28], [21,30],[25,44],[41,39],[31,43],[21,39], [28,40],[26,43],[35,35],[30,25],[12,26], [23,34],[28,14],[25,31],[43,28],[28,18], [6,42],[27,28],[41,19],[37,20],[27,28], [43,9],[33,32],[35,29],[39,13],[23,22], [83,38],[88,44],[77,35],[93,32],[83,42], [79,40],[79,55],[91,27],[79,26],[75,49], [89,36],[84,51],[82,35],[79,19],[79,46], [86,41],[85,29],[91,40],[91,17],[80,54], [88,13],[77,31],[90,47],[79,23],[77,45], [80,25],[88,49],[75,26],[88,31],[80,37], [45,82],[44,84],[43,90],[50,87],[42,81], [49,88],[42,86],[49,81],[43,84],[47,84], [43,83],[49,85],[46,87],[46,84],[46,80], [46,85],[45,85],[48,84],[42,82],[46,84]]; xs=6,xe=91,ys=9,ye=87; iters = 10;fps = k*iters/speed; clear(); mapDataPoints(points,"blue",s/1.2); err = 0; } var centers = []; function plot4() { centers = []; points = []; for(d=0;d1){k -= 1;document.getElementById("k").innerHTML= k;fps = k*iters/speed;}} function zoomOut() { c.width = c.width; s -= .25; if(started) {map(); connect(points, centroids)} else {mapDataPoints(points,"blue",s/1.2)} } function zoomIn() { c.width = c.width; s += .25; if(started) {map(); connect(points, centroids)} else {mapDataPoints(points,"blue",s/1.2)} } function clear() {c.width = c.width;}

K-means