R scripts for exploratory data analysis using SOM