0

我正在使用以下脚本来绘制 SOM，并且我想提取与每个节点对应的 HTML 颜色代码。

它似乎不在 som_model s3 对象中。

任何想法？

library(kohonen)

data<-matrix(c(-0.406,-0.406,-0.406,-0.406,2.463,-0.406,-0.406,2.463,-0.406,-0.406,-0.406,-0.406,
  -0.406,-0.406,-0.406,-0.406,-0.406,-0.406,-0.406,-0.406,0.4188448,1.6027146,0.7208751,
  0.7724322,0.5655424,-1.6969826,0.3429044,0.396769,0.3224141,-0.7324542,-0.5303228,0.9943725,
  -0.0324817,1.321637,-1.1985506,-0.3409802,-0.1393889,-0.3964047,0.9597519,-0.2443682), ncol=2)    

som_grid <- somgrid(xdim = 4, ydim=4, topo="hexagonal")

som_model <- som(data, 
                 grid=som_grid, 
                 rlen=100, 
                 alpha=c(0.05,0.01), 
                 keep.data = TRUE,
                 n.hood='circular')

plot(som_model,type="count")

我正在寻找的输出将是一个列表/向量，每个节点的颜色代码为：“#0000FF”、“#FF0000”...

4

1 回答 1

0

这个plot电话实际上是一个电话plot.kohonen，反过来，它要求plot.kohprop设置一些情节美学，包括配色方案。默认配色方案是heat.colors+ gray。对于您的情况，您可以执行heat.colors(3)然后查看som_model$grid以确定颜色映射。

您可以plot.kohprop通过在 R 控制台上输入无括号的函数名称来查看功能。

于 2014-12-10T11:56:31.793 回答