Cannot change colour legend position for continuous variable

Locked question #1049 relates to the same issue, which still persists. Changing legend position is fiddly but works ok for factor variable:

require(ggplot2)
require(ggmap)
require(plotly)

m = c(left=60.5, bottom =29.3, right = 75.2, top = 38.5) |> 
  ggmap::get_stamenmap(maptype = 'toner', zoom = 6)

d = data.frame(x = rnorm(mean = 65, sd = 3, 50), 
               y = rnorm(mean = 34, sd = 2, 50))

p1 = ggmap(m) + 
  geom_point(data=d, aes(x, y, col = factor(round(x))), size=3) +
  labs(col = 'Eastness', x = NULL, y = NULL) +
  theme_void()

ggplotly(p1) |> layout(legend = list(xanchor  = "left", x = 0, yanchor = "bottom", y = 0.2))

But for a continuous variable this fails:

p2 = ggmap(m) + 
  geom_point(data=d, aes(x, y, col = x), size=3) +
  labs(col = 'Eastness', x = NULL, y = NULL) +
  theme_void()

ggplotly(p2) |> layout(legend = list(xanchor  = "left", x = 0, yanchor = "bottom", y = 0.2))

This seems to me this is a pretty basic and important thing to get right. I wonder if there's any chance to fix?

Bắt đầu bằng cách chạy các ví dụ R có thể tái lập cho p1 và p2 trong issue, so sánh các chú giải màu factor và liên tục sau lệnh gọi layout. Theo dõi cách ggplotly chuyển đổi từng chú giải và cách áp dụng việc định vị của layout. Công việc được hoàn thành khi chú giải màu liên tục được di chuyển đến vị trí được yêu cầu mà không làm hỏng trường hợp factor.