放大ggmap问题

Question

我对R和ggmap还是很陌生，但是我找不到在线答案。 我正在尝试使用ggmap在给定距离上绘制心率。不幸的是我的地图缩小了。通常，我会使用类似coord_cartesian(xlim = c(43.83, 43.84), ylim = c(-111.815,-111.805 ))或scale_x_continuous(limits = c( 43.83, 43.84), expand = c(0, 0))之类的东西，但是在两种情况下，它都带有错误说明：

  

“'x'的比例已经存在。为'x'添加另一个比例，   将取代现有的秤。”

这是我的代码：

library(haven)
library(ggmap)

df1 <- cad_run %>%
  filter(Day == "29")

map <- get_googlemap("rexburg idaho", zoom = 14, maptype = "hybrid") 

ggmap(map, extent='panel') +
  geom_point(aes(x = longitude, y = latitude, colour = heart_rate), 
             data = df1, size = .5) + 
  scale_colour_gradientn(colours = rainbow(3)) +
  ggtitle("January 29") + ylab('latitude') + xlab('longitude') +
  scale_x_continuous(limits = c( 43.83, 43.84), expand = c(0,0))

这是我没有缩放的图像：