R - 地图缩放功能，将图表改为圆形而不是正方形

要实现R语言中地图的缩放功能，并将图表改为圆形而不是正方形，可以使用ggplot2包结合geom_point()函数来实现。以下是一个示例代码：

library(ggplot2)

# 原始数据
data <- data.frame(city = c("北京", "上海", "广州"),
                   lon = c(116.40, 121.47, 113.23),
                   lat = c(39.90, 31.23, 23.16),
                   population = c(21540000, 24240000, 14040000))

# 地图数据，包含经纬度
map_data <- map_data("world")

# 绘制地图
p <- ggplot() +
  geom_polygon(data = map_data, aes(x = long, y = lat, group = group),
               fill = "lightblue", color = "gray") +
  coord_map() +
  theme_void()

# 添加圆形点图层
p <- p + geom_point(data = data, aes(x = lon, y = lat, size = population),
                    color = "red", alpha = 0.6, shape = 21)

# 设置点的大小范围
p <- p + scale_size_continuous(range = c(2, 10))

# 输出图表
print(p)

在上述代码中，首先加载ggplot2包，然后创建一个包含城市经纬度和人口数据的数据框data。接下来，使用map_data()函数获取世界地图的经纬度数据，并使用geom_polygon()函数绘制地图的多边形。然后，使用coord_map()函数将地图的纬度和经度坐标缩放到合适的比例。使用theme_void()函数将背景设置为透明。然后，使用geom_point()函数添加圆形点图层，其中size参数设置点的大小，color参数设置点的颜色，alpha参数设置点的透明度，shape参数设置点的形状。最后，使用scale_size_continuous()函数设置点的大小范围，并使用print()函数输出图表。

这段代码将根据城市人口的大小，以圆形点的形式在地图上显示城市的位置，并且通过调整点的大小来表示城市的人口数量。