Generative Topographic Mapping for R