R GGPLOT从一个数据框中的数据中绘制，使用数据框架标签轴ticks ticks ticks ticks ticks tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick tick？

Question

我有2个数据集。在data中，b被编码为数字值。 data1表示b是chr data的原始内容。

我想使用数据的数字数据绘制一个框图，但是从b in data1中拉出y轴tick标签。 。这可能吗？

玩具数据：

data <- data.frame(a = c(1,1,1,1,1,2,2,2,2,2,3,3,3,3,3),
                   b = c(10,10,11,11,12,12,12,13,13,13,14,14,14,15,15),
                   c = c('x','y','y','x','y','y','x','y','y','x','y','y','x','x','y'))

data1 <- data.frame(a = c(1,1,1,1,1,2,2,2,2,2,3,3,3,3,3),
                   b = c('never','never','rare','rare','some','some','some','most','most','most','often','often','often','always','always'),
                   c = c('x','y','y','x','y','y','x','y','y','x','y','y','x','x','y'))

我尝试使用scale_y_discrete：

ggplot(data,aes(x = as.factor(a), y = b, fill = c))+
      geom_boxplot()+
  scale_y_discrete(data1$b,labels=unique(data1$b))

作为您可以看出，Y轴tick标签未按预期显示。

为了进一步参考，这将用于更大的数据集，作为闪亮应用程序的一部分。该图形成了一个反应元素，因此我需要避免对实际标签名称进行硬编码。

感谢您的帮助。

Answer 1

由于您的b变量是连续的，因此必须使用scale_y_continous。对于您的示例数据scale_y_continouul（labels = unique（data1 $ b））会起作用，我个人建议使用一个命名的标签矢量，该标签较少，并且将标签分配给数字值：

library(ggplot2)

labels <- unique(data1$b)
names(labels) <- 10:15

ggplot(data,aes(x = as.factor(a), y = b, fill = c))+
  geom_boxplot()+
  scale_y_continuous(labels = labels)

< img src =“ https://i.sstatic.net/vzq5c.png” alt =“”>