geom_errorbar does not take "size" aesthetics

It seems ggplotly returns the same plot with different size. Here is an example:

df <- data.frame(x = 1:10,
                 y = 1:10,
                 ymin = (1:10) - runif(10),
                 ymax = (1:10) + runif(10),
                 xmin = (1:10) - runif(10),
                 xmax = (1:10) + runif(10))

p <- ggplot(df)+
  geom_errorbar(aes(ymin = ymin, ymax = ymax, x = x, y = y), size = 10)


ggplotly(p)

Bắt đầu bằng cách chạy ví dụ R được cung cấp với ggplotly và so sánh đầu ra được render của geom_errorbar với các giá trị size khác nhau. Theo dõi điểm vào của quá trình chuyển đổi ggplotly cho geom_errorbar và xác định nơi aesthetic size bị mất. Công việc được xem là hoàn tất khi các thanh sai số được render thay đổi rõ ràng theo size và hành vi này được bao phủ bởi một regression test.