Displaying 1 result from an estimated 1 matches for "gridwidth".
2005 Feb 04
1
Rare Cases and SOM
...ther (this is
an oversimplification).
Say for example:
InputA<-matrix(cos(1:10),nrow=900,ncol=10,byrow=TRUE)
InputB<-matrix(sin(5:14),nrow=100,ncol=10,byrow=TRUE)
Input<-rbind(InputA,InputB)
I though that a small grid of 3*3 would be enough to
extract the patterns in such simple matrix :
GridWidth<-3
GridLength<-3
gr <- somgrid(xdim=GridWidth,ydim=GridLength,topo =
"hexagonal")
test.som <- SOM(Input, gr)
par(mfrow=c(GridLength,GridWidth))
for(i in 1:(GridWidth*GridLength))
plot(test.som$codes[i,],type="l")
Only when I use a larger grid (say for example 7*3 )...