2017-04-14 87 views
0

這是我的代碼:添加一條垂直線並使用繪圖R突出顯示圖中y軸標籤中的值。

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') 

我有一個很好的情節,但我想在劇情中添加一些額外的功能。我想在值爲5的y軸上添加一條紅色垂直線,並將該線命名爲SLA。

有人可以提出任何解決方案。

+1

嘗試編輯這個職位有相應的回報和標籤,使用代碼周圍的大括號所以它是可讀性cpde。如果人們確信他們知道它說什麼,你會更快找到幫助。 – sconfluentus

回答

0

可能:

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 
+0

謝謝@guscht。你的代碼以某種方式給了我一個想法,但它仍然有一些問題與我的預期結果。我修改了代碼,現在得到了完美的結果。 –

+0

add_lines(p,y = 5,name =「SLA」,color =「red」,list(color ='rgb(205,12,24)',width = 4,dash ='dot')) –

+0

調整好代碼以使其工作。 – guscht

相關問題