From what is described in this blog post, it looks like one of many sowing strategies used for k-tools. In fact, I would not call this the clustering method, but was pre-clustering or something like that.
Perhaps you should take a look at the flexclust R package, I believe that it has some options and initializations of k-means, and perhaps this option has one option to initialize. Or it could be at http://cran.r-project.org/web/views/Cluster.html
Please note that choosing the facility that is farthest away tends to choose emissions as cluster centers! Take a look, for example. k-means ++, based on a similar idea, but somewhat smarter (plus, it supports randomization better, so you can try several different initializations). Or you can select the object that is closest to (2k-1)/(2k) quantile, which is probably the best guess for a good cluster center.
source share