如何在R中绘制时间序列的k-medoids结果？

我正在做一个与确定销售动态相关的项目。我的数据库就是这样的。共有三列：

产品-显示产品组

周-产品发布后的时间（周），前26周

销售收益-每周产品的销售如何变化

数据库中有3302个观测值=127个时间序列

我的目标是将时间序列分组，向我展示不同的销售动态。我使用了k-medoids算法（在用FFT/DWT转换数据之后），我不知道如何在不同的图上显示每个集群=分组的时间序列

谁能告诉我该怎么做

以下是集群代码：

clustersalesGain = pam(t(salesGain), 8)
nazwy = as.character(nazwy)
cbind(nazwy,clustersalesGain$clustering)

---

我想在不同的图上显示输出。

k-medoids返回实际数据点作为群集中心

只需像可视化数据一样可视化它们

---

（如果您还没有可视化数据，最好现在就开始工作。）

给每个簇赋予不同的颜色或线条样式，然后将它们绘制在一张图表中如何？这是我的问题，因为我不知道如何为每个簇定义不同的颜色。你能帮我做一下手术吗？很抱歉我的能力不足，但这是我第一次在R中处理聚类。参数col=of line.ts函数用于控制时间序列的颜色。很抱歉，但我仍然不知道如何实现它。因为在使用“cbind（nazwy，clustersalesGain$clustering）”后，我得到的结果是：nazwy[1，]“Akcesoria_dla_zwierząt”1[2，]“Balsam”1[3，]“Baton_zbożowy”2[4，]“Bekon”1等等。我应该如何在红色的绘图上定义-绘图簇1？你能给我举个例子吗