我怎样才能用 somSC 类型的图表做一个多图?
How can I do a multiple plot with a somSC type graph?
我确定这很简单,但我不知道为什么这段代码不能在同一个图中绘制两个图 window。
nfil=5
ncol=5
set.seed(850)
som <- trainSOM(x.data=datasom[3:8],
dimension=c(nfil,ncol),
nb.save = 100,
verbose=TRUE)
# SUPERCLUSTERS
num.grupos=4
som.sc <- superClass(som, k=num.grupos)
### PLOTEO SOM
par(mfrow=c(1,2))
plot(som.sc, plot.var=FALSE)
# observaciones de cada neurona
counts<-as.vector(som.sc$som$clustering)
kounts<-c(0)
for (i in 1:(nfil*ncol)) {
kounts[i]=0
}
for (i in 1:(length(counts))) {
kounts[counts[i]]=kounts[counts[i]]+1
}
plot(som.sc, type="grid",names=kounts)
据我在 google 中所读,使用 par(mfrow=c(1,2))
行应该没问题,但它不起作用。我 运行 代码和第一个情节使用了 window 的前半部分,这是应该的。但是,第二个情节使用整个 window。请帮我!。谢谢
P.S.: 这篇post的复习不允许我写完整的代码。我正在使用 SOMbrero 软件包。
热图可能不适用于 par()。也许这些会有所帮助:
to display two heatmaps in same pdf side by side in R
我确定这很简单,但我不知道为什么这段代码不能在同一个图中绘制两个图 window。
nfil=5
ncol=5
set.seed(850)
som <- trainSOM(x.data=datasom[3:8],
dimension=c(nfil,ncol),
nb.save = 100,
verbose=TRUE)
# SUPERCLUSTERS
num.grupos=4
som.sc <- superClass(som, k=num.grupos)
### PLOTEO SOM
par(mfrow=c(1,2))
plot(som.sc, plot.var=FALSE)
# observaciones de cada neurona
counts<-as.vector(som.sc$som$clustering)
kounts<-c(0)
for (i in 1:(nfil*ncol)) {
kounts[i]=0
}
for (i in 1:(length(counts))) {
kounts[counts[i]]=kounts[counts[i]]+1
}
plot(som.sc, type="grid",names=kounts)
据我在 google 中所读,使用 par(mfrow=c(1,2))
行应该没问题,但它不起作用。我 运行 代码和第一个情节使用了 window 的前半部分,这是应该的。但是,第二个情节使用整个 window。请帮我!。谢谢
P.S.: 这篇post的复习不允许我写完整的代码。我正在使用 SOMbrero 软件包。
热图可能不适用于 par()。也许这些会有所帮助:
to display two heatmaps in same pdf side by side in R