An implementation of the Growing Neural Gas algorithm in Rcpp.
You can run gng as follows:
library(gng)
data(iris)
gng_fit <- gng(as.matrix(iris[,1:4]))
And visualise it as follows:
plot_gng(gng_fit, iris[,5], max_size = 0.05, max_size_legend = .15)