SOM_PAK
-> http://www.cis.hut.fi/research/som-research/nnrc-programs.shtml
-> http://www.cis.hut.fi/research/som_pak/binaries_windows/
-> http://www.cis.hut.fi/research/som_pak/binaries_windows/
michi - 4. Sep, 21:30
A B C D E F G H I J K L M N O P
High School 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0
Agricultural Coop. 0 1 1 1 0 0 1 0 0 0 0 1 0 0 1 0
Railway Station 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0
One-Room-School 1 0 0 0 1 1 0 0 1 1 0 0 1 1 0 1
Veterinary 0 1 1 1 0 0 1 0 0 0 0 1 0 0 1 0
No Doctor 1 0 0 0 1 1 0 0 1 1 0 0 1 1 0 1
No Water Supply 0 0 0 0 0 0 0 0 1 1 0 0 1 1 0 0
Police Station 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 0
Land Reallocation 0 1 1 1 0 0 1 0 0 0 0 1 0 0 1 0
> bertin(bertin.mat)
I J N M A F P E H K G C B O D L
Land Reallocation 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1
Veterinary 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1
Agricultural Coop. 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1
High School 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0
Railway Station 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0
Police Station 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0
No Water Supply 1 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0
No Doctor 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0
One-Room-School 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0
Run1: fitness = -150w <- iwindow()
add(w, igraphics())
a <- rnorm(100)
plot(density(a))
islider(1, window=w, handler=function(h,...)
plot(density(a, bw=get.value(h$obj)/300)))
visible(w,TRUE)