R中自组织映射的面元属性提取

我试图在R编程中使用SOM对大量数据进行集群。示例代码如下：

> library("kohonen")
> data("wines")
> wines.sc <- scale(wines)
> set.seed(7)
> wine.som <- som(data = wines.sc, grid = somgrid(5, 4, "hexagonal"))
> plot(wine.som, main = "Wine data")

>库（“kohonen”）
>数据（“葡萄酒”）
>葡萄酒。sc系列。种子（7）
>wine.som绘图（wine.som，main=“葡萄酒数据”）

现在我有两个问题：

如何提取bin属性以找出每行数据属于哪个bin？（例如，我想知道每个葡萄酒数据行属于哪个箱子）

如何保存SOM并在新数据集上测试它