Wrong time displayed in hover text for some chart types

In the London time zone in BST period, the time displayed in the hover text is incorrect and is offset by one hour when converting a ggplot chart to Plotly. The issue is visible with bar chart and area chart, but not present with line chart and scatter plot. (Though I haven't tested all chart types so the issue could be more widespread.) The problem is present in plotly version 4.10.0 (ggplot2 version 3.6.6), but was not present in plotly version 4.9.3 (ggplot2 version 3.0.0).

library(ggplot2)
library(plotly)
library(lubridate)

Sys.setenv(TZ = "Europe/London")

datetime <- seq(ymd_hm("2023-04-01 00:00"), ymd_hm("2023-04-02 00:00"), by = "30 min")
df <- as.data.frame(datetime)
df$test_variable <- ifelse(df$datetime == ymd_hm("2023-04-01 12:00"), 1, 0)

#Line chart - no issue
ggplotly(
  ggplot(df, aes(datetime, test_variable)) +
    geom_line()
)

#Scatter plot - no issue
ggplotly(
  ggplot(df, aes(datetime, test_variable)) +
    geom_point()
)

#Bar chart - wrong time displayed
ggplotly(
  ggplot(df, aes(datetime, test_variable)) +
    geom_col()
)

#Area chart - wrong time displayed
ggplotly(
  ggplot(df, aes(datetime, test_variable)) +
    geom_area()
)

Bắt đầu với bản tái hiện R được cung cấp, sử dụng Europe/London trong BST, và so sánh đầu ra của ggplotly() cho geom_col() và geom_area() với các biểu đồ đường và phân tán. Hoàn tất khi văn bản hover hiển thị đúng giờ địa phương cho các loại biểu đồ bị ảnh hưởng mà không gây hồi quy ở các loại biểu đồ vốn đã hoạt động.