使用传单函数 add_heatmap() 或 addHeatmap() 在 R 上创建热图

Posted 2023-02-18

【中文标题】使用传单函数 add_heatmap() 或 addHeatmap() 在 R 上创建热图

【英文标题】：Creating a heatmap on R using leaflet function add_heatmap() or addHeatmap()

【发布时间】：2021-08-04 19:30:44

【问题描述】：

我正在尝试使用 plotly add_heatmap() 函数创建带有热图的绘图，但它会生成一条错误消息，提示 错误：必须提供 z 属性 我提到了 this site 的 addHeatmap( ) 函数由 leaflet.extras 包提供。

以下代码仅显示 addCircles() 中的点，并输出警告消息和地图，如下所示：

final_df %>%
  leaflet() %>%
  addTiles() %>%
  addCircles(
    lng = final_df$long,
    lat = final_df$lat,
    popup = final_df$station_name
  ) %>% addHeatmap(lng = final_df$long, lat = final_df$lat, radius=5)

我尝试了与传单不同的函数 add_heatmap()，它不显示任何地图并产生错误。

final_df %>%
  leaflet() %>%
  addTiles() %>%
  addCircles(
    lng = final_df$long,
    lat = final_df$lat,
    popup = final_df$station_name
  ) %>% add_heatmap(lng = final_df$long, lat = final_df$lat)

有人遇到过类似问题并在 R 上创建了热图吗？

【问题讨论】：

在 addHeatmap() 的警告消息中，它会通知您数据中存在无效的 lat/lng 坐标。您是否尝试过从 lat/lng 列中删除 NA 值。 dplyr::filter(!is.na(lat))

【参考方案1】：

删除 addCircles 部分并尝试：

library(leaflet.extras)

final_df %>%
  leaflet() %>%
  addTiles() %>%
  addHeatmap(lng = final_df$long, lat = final_df$lat, blur = 40, max = 0.05, radius = 15)