我與包plotly
一樣。
這裏是代碼(我的數據不是根據您的描述,但它足以顯示代碼)。
library("plotly")
set.seed(123)
df <- data.frame(
Cycle=c(1:10)
, Instances=runif(10,0,100)
, MaxFitness=runif(10,0.5,5)
, MinFitness=runif(10,0.5,5)
)
######
## Plot
p <- plot_ly(data = df) %>%
add_lines(x=~Cycle, y=~MaxFitness, color="blue", name="MaxFitness") %>%
add_lines(x=~Cycle, y=~MinFitness, color="green", name="MinFitness") %>%
add_lines(x=~Cycle, y=~Instances, color="red", name="Instances", yaxis="y2") %>%
layout(
title = "Double Y Axis Example",
yaxis=list(
title = "left y axis"
),
yaxis2=list(
tickfont = list(color = "red"),
overlaying = "y",
side = "right",
title = "right y axis"
)
)
p
下面是輸出:
現在,您可以根據自己的喜好編輯您的整個陰謀。
我認爲最快的解決方法是使用標準化數據的基本繪圖,然後手動添加y軸 – clemlaflemme
您可以給我們您的「頭(數據)」? – TheBiro