Alpha from stat_summary_2d ignored

ggplotly does not carry over the alpha level for stat_summary_2d. Seems like it may be similar to the same issue that occurred with points in a previous version.

This isn't as obvious in the reproducible example, but for regions where the map isn't just water, and the locations are more dense, having the alpha allows for a visible basemap.

fiji <-  get_googlemap("Fiji", zoom = 5, maptype = "roadmap", color = "bw", size = c(640, 480), scale = 2)

ggplotly({
  ggmap(fiji, extent = "device") + 
  stat_summary_2d(data = quakes, aes(x = long, y = lat, z = mag), alpha = .55 , fun = mean, bins = 100) +
  scale_fill_gradient(name = "Fullness", low = "green", high = "red")
  }, tooltip = "fill"
)

ggplot2 output:

plotly output:

从 issue 中可复现的 R 示例开始，比较 ggplot2 和 plotly 的输出，重点关注 stat_summary_2d 及其 alpha 设置。跟踪该图层的转换路径，并通过确认 plotly 输出在底图上保留了所请求的透明度来验证结果。