kmeans now have working clear message and accumulative training.

release-packaging/Classes/FluidKMeans.sc

@@ -103,6 +103,13 @@ FluidKMeans : FluidRealTimeModel {
 		this.prSendMsg(this.setMeansMsg(dataSet));
 	}
 
+	clearMsg{ ^this.prMakeMsg(\clear, id) }
+
+    clear{ |action|
+        actions[\clear] = [nil, action];
+		this.prSendMsg(this.clearMsg);
+	}
+
 	kr{|trig, inputBuffer,outputBuffer|
 		^FluidKMeansQuery.kr(K2A.ar(trig),
 			this, clusters, maxiter,

release-packaging/HelpSource/Classes/FluidKMeans.schelp

@@ -201,8 +201,7 @@ code::
 ~centroids.print
 ~kmeans.setMeans(~centroids, {~kmeans.predict(~dataSet,~clusters,{~clusters.dump{|x|var count = 0.dup(4); x["data"].keysValuesDo{|k,v|count[v[0].asInteger] = count[v[0].asInteger] + 1;};count.postln}})});
 
-~kmeans.free
-~kmeans = FluidKMeans(s);
+~kmeans.clear
 ~kmeans.predict(~dataSet,~clusters)
 
 ::