在ggplot中添加第二个x轴到boxplot

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))