Следующий код дает хороший график, и все выглядит нормально:
ggplot(data = ATPase_all_forplot, aes(x = AvTemp, y = AvAct)) +
geom_errorbar(
data = ATPase_all_forplot,
aes(
#x = ATPase_all_forplot$AvTemp,
color = Rca,
ymin = ATPase_all_forplot$AvAct - ATPase_all_forplot$SDEVAct ,
ymax = ATPase_all_forplot$AvAct + ATPase_all_forplot$SDEVAct
)) + geom_errorbarh(
data = ATPase_all_forplot,
aes(
#y = ATPase_all_forplot$AvAct,
color = Rca,
xmin = ATPase_all_forplot$AvTemp - ATPase_all_forplot$SDEVTemp,
xmax = ATPase_all_forplot$AvTemp + ATPase_all_forplot$SDEVTemp
),
height = 0) + geom_smooth(
data = ATPase_all_clean,
aes(x = Temperature, y = Activity, color = Rca),
se = TRUE,
method = "gam",
formula = y ~ s(x)) + geom_point(data = ATPase_all_forplot, aes(color = Rca, x = AvTemp, y = AvAct)) + facet_wrap(vars(Rca)) + labs(x = "Temperature (°C)", y = expression('ATPase activity (µmol mg' ^ "-1" * ' min' ^ "-1" * ')')) + scale_colour_manual(values = c("#0072B2", "#D55E00", "#E69F00", "#009E73")) + scale_y_continuous(breaks = c(0.0, 0.5, 1.0, 1.5, 2.0),limits = c(0.0, 2.0), sec.axis = dup_axis())
Некоторые примеры данных из набора данных, используемые в функции ggplot ():
Rca AvTemp SDEVTemp AvAct SDEVAct
1 1β 15.40 0.24 0.257 0.094
2 1β 20.50 0.23 0.763 0.046
3 1β 25.13 0.16 1.041 0.103
4 1β 27.60 0.09 1.195 0.073
5 1β 29.90 0.27 1.333 0.120
6 1β 32.94 0.53 1.584 0.086
7 1β 35.07 0.24 1.641 0.095
8 1β 37.80 0.61 1.726 0.087
9 1β 40.06 0.18 1.646 0.092
Однако, когдаЯ экспортирую график в формате pdf и увеличиваю его. Я вижу эти странные маленькие линии, идущие от строк ошибок:
Есть идеи, что может быть причиной этого?Ура!