在图中的条形图之间创建刻度线以区分组

Question

我正在尝试找到一种在 plotly 的条形图之间创建刻度线（或线）的方法。

这是我的数据

C:\xampp\php

我要添加的内容是这样的，而不影响xaxis标题和外观。

   year <- 2001:2012
   groupA <- round(runif(12,10,15),0)
   groupB <- round(runif(12,10,15),0)
mydata <- data.frame(year, groupA, groupB)

xa <- list(title = 'Count',
           showticklabels = TRUE,
           overlaying = "x",
           autotick = F,
           dtick = 1,
           tickangle = -45)

plot_ly(
  mydata, 
  x = ~year,
  y = ~groupA,
  name = "Group A",
  type = 'bar') %>% 
  add_trace(y = ~groupB, name = 'Group B') %>% 
  layout(yaxis = list(title = 'Count'),
         xaxis = c(xa),
         barmode = 'group')

我会对垂直线感到满意，但是，勾号是我想要的首选选项：