我想 for each 类别(LETTERS
)绘制一个两条并排的条形图,并在每个条形图上添加一条水平线(y_ref
为红线,z_ref
为绿线).应该是这样的:
我try 了添加跟踪(以及添加线、添加段等),但找不到正确的方法.这是我到目前为止试过的一款reprex.
df <- tibble(x = LETTERS[1:5], y = runif(5), z = runif(5), y_ref = runif(5), z_ref = runif(5))
plot_ly(
df,
x = ~x,
y = ~y,
type = "bar",
name = "a"
) %>% add_trace(
y = ~z,
name = "b"
) %>% layout(
legend = list(
orientation = "h"
)
) %>% add_trace(
y = ~y_ref,
type = 'scatter',
mode = 'lines',
marker = list(
line = list(
width = 2,
color = "red"
)
)
) %>% add_trace(
y = ~z_ref,
type = 'scatter',
mode = 'lines',
marker = list(
line = list(
width = 2,
color = "green"
)
)
)
编辑:我需要一个n
条的解决方案.