使用plotly R添加垂直线并在图表中的y轴标签中突出显示值？

Question

这是我的代码：

Name<-c('Launch', 'Login', 'Default_Salary_Page', 'DownloadSlip', 'Advance_SalaryPage', 'Raise', 'Certificates')
Avg<-c(2.35,8.91,5.06,1.2,4.22,7.42,1.00)
Percentile_90<-c(3.35,9.91,6.06,2.54,6.45,8.12,2.05)
input<-data.frame(Name,Avg,Percentile_90
plot_ly(input,x=~Name,y=~Avg,name='Avg', type='scatter')%>%add_trace(y=~Percentile_90,name='Percentile_90', type='scatter')

我有一个很好的情节，但我想在情节中添加一些额外的功能。我想在y轴上添加一条红色垂直线，其值为5，并将该行命名为SLA。

有人可以建议任何解决方案。

Answer 1

也许：

p <- plot_ly(input, x=~Name, y=~Avg, name='Avg', mode='markers', type='scatter')
p <- add_trace(p, y=~Percentile_90, name='Percentile_90', mode='markers', type='scatter')
p <- add_lines(p, y = 5,name='SLA', mode='lines', line=list(color='red'))
p