Я сделал этот график в R с использованием «plotly» в качестве подзаговора со следующими кодами, но мне нужно сделать 2 изменения, которые я не могу понять, даже если попытался.
- Я не получаю "title" для "x-axis" как один общий для всех 3-yaxis.
- Я хочу поставить символ Delta "греческая буква" вместо того, чтобы писать как "d".
- Я не знаю, как я могу сделать 18 как степень «О», как маленькое 18 над «О».
p1 = plot_ly(test1, x = H_B, y = GV7_d18O_B) %>%
add_lines(name = "δ18O_B") %>%
layout(yaxis = a)
p2 = plot_ly(test1, x = `Iso_H(we)_D`, y = Iso_d18O_D) %>%
add_lines(name = "δ18O_D") %>%
layout(yaxis = b)
p3 = plot_ly(test1, x = `Iso_H(we)_E`, y = Iso_d18O_E) %>%
add_lines(name = "δ18O_E") %>%
layout(yaxis = c)
subplot(p1, p2, p3, nrows = 3, shareX = TRUE, margin = 0.05) %>%
layout(main = "GV7_δ18O vs Depth (cm.we)")