在图中隐藏轴

Question

我有一张图表 我需要在那里隐藏轴。 我已经拿到了

res.mca <- MCA(df)

我尝试使用

axes=FALSE

但它返回

error in coord.var[, 1]

所有代码：

library(FactoMineR)
df <- read.table("tasks_correspondence_t.txt", header = TRUE)
row.names(df) = df$id
df = df[,-1]
for (i in 1:ncol(df)) df[,i]=as.factor(df[,i])
res.mca <- MCA(df)

df看起来像

            a   b   c   d   e
1mbank.ru   0   0   0   0   0
akbars.ru   0   0   0   0   0
alfabank.ru 1   0   0   1   0
avangard.ru 0   0   0   0   0
bank-hlynov.ru  0   0   0   0   0

Answer 1

如果不修改MCA()或plot.MCA()的内容，则无法实现，因为轴标签是硬编码的。后者在MCA()的情况下从graph = TRUE调用，但即使保存对象然后调用plot()也无法帮助您，因为问题出在plot.MCA()。< / p>

plot.MCA()中的相关代码是

  lab.x <- paste("Dim ", axes[1], " (", format(res.mca$eig[axes[1], 
                                                           2], nsmall = 2, digits = 2), "%)", sep = "")
  lab.y <- paste("Dim ", axes[2], " (", format(res.mca$eig[axes[2], 
                                                           2], nsmall = 2, digits = 2), "%)", sep = "")

尝试将其更改为

lab.x <- ""
lab.y <- ""

看看它是否对你有帮助。