绘图后将数字轴更改为字符串

Question

所以我正在研究K-Modes并立即进行策划。问题是你需要一个K模式的数字矩阵，这很好，直到我去图表。除了数字之外，图表本身看起来很棒。我希望将数字转换的分类变量转回各自的字符串计数器部分。这是示例图。我想将1-5的X值转换为差，优秀，良好

这是MVE代码

dataFrame <- DATA
for (column in colnames(dataFrame)) {
  dataFrame[[column]] <- as.numeric(dataFrame[[column]])
}
dataFrame <- data.matrix(dataFrame)

cl <- kmodes(dataFrame, 2)
  # plot(dataFrame, col = cl$cluster)
  # points(cl$modes, col = 1:5, pch = 8)
  plot(jitter(dataFrame), col = cl$cluster, main = "Results")
  points(cl$modes, col = 1:10, pch = 8, cex = 20)

DATA 可以是仅由分类变量组成的数据框（所以我想你可以在那里输入一些字符串？）。