Question

我需要根据第一个轴（即一年中的某一天）制作第二个x轴。但我有连续比例提供的离散值误差。

b    Alt
148  1300
122  1300
130  1300
250  2000
300  2000
244  2000

 `` MonthId <- c("Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Agu", 
 "Sep", 
 "Oct", "Nov", "Dec")
 FirstDay <- c(1, 32, 60, 91, 121, 152, 182, 213, 244, 274, 305, 335,365)
 MiddleDay <- c(16, 45, 75, 105, 136, 166, 197, 228, 258, 289, 319, 350)
 g.b <- ggplot(CDD, aes(factor(Alt), b))
 g.b+
 scale_x_continuous(breaks = unique( MiddleDay), 
         sec.axis = sec_axis(~ ., breaks = unique( MiddleDay)))

Answer 1

我不完全确定你要做什么，但因子（Alt）使你的x场离散。尝试删除它，以便您的代码看起来像：

g.b <- ggplot(CDD, aes(Alt, b))

将第二个x轴添加到ggplot中的boxplot

1 个答案: