//
//Som (Self Organization Map) command
//
//

//Syntax
som inputs;

//
//Options
//
xunit=10  //num of x direct grids (default 10)
yunit=10  //num of y direct grids (default 10)
loop=100  //loop limit (default 100)

//
//Example
// 
//This Example classifys 15 industry with 8 index to 10 × 10 grid.  
//
hand id name x1   x2  x3  x4    x5   x6   x7   x8/
1  スーパー 5.5	 3.5 1.4 110.8 45.7 24   22.6 12
2  コンビニ 5.1	 4.8 1.6 196.2 36.5 22.3 20.7 10
3  織物衣服 5.9	 1.6 3.8 198.6 7.2  37.7 33.9 17
4  呉服衣服 5.3	 1.1 4.4 210.8 4.7  45.5 41.1 20
5  寝具	    5.1	 1.5 4.9 214.3 6.8  45.5 40.6 20
6  男子服   2.8	 0.9 4.3 118.4 5.8  42.8 38.5 16
7  婦人服   8.6	 2   3.9 186.4 8.9  36   32.1 19
8  靴	    3.9	 1.4 3.4 197.7 6    32.7 29.3 15
9  履物	    7.4	 1.3 8.5 302.5 7.3  31.7 23.2 15
10 洋品雑貨 4.5	 1.8 2.8 168.4 5.5  33.7 30.9 15
11 食料品   12	 3.7 3.3 192.5 26.5 24.4 21.1 12
12 酒	    7.5	 3.3 2.6 165.4 20.4 19.4 16.8 8
13 食肉	    10.7 2.8 4.8 242.9 52.1 39.9 35.1 22
14 鮮魚	    8.4	 3.1 3.7 161.4 71.6 30.7 27   13
15 八百屋   17.2 3.7 3.7 226.5 78.8 25.9 22.2 17
:

som x1-8;

get freq@ana;

plot scat x y by id;