Question

所以这个我无法弄明白。我有一个创建热图的功能。

createHeatMap <- function(mapData){
  ggmap(mapImageData1, extent = 'device') +
    geom_density2d(data = mapData, aes(x = Longitude, y = Latitude), size = 0.3) +
    stat_density2d(data = mapData, aes(x = Longitude, y = Latitude, fill = ..level.., alpha = ..level..), size = 0.01, bins = 16, geom = "polygon") + 
    scale_fill_gradient(low = "green", high = "red") +
    scale_alpha(range = c(0, 0.3), guide = FALSE);
};

当我将数据帧传递给它时，这是有效的。但是，当我尝试迭代for循环并使多个映射没有任何反应时。

Users <- unique(baitStations$User);
for (user in Users){
  userData <- subset(baitStations, baitStations$User == user);
  createHeatMap(userData);
};

但是当我在for循环之外进行调用时，它可以工作。

for (user in Users){
  userData <- subset(baitStations, baitStations$User == user);
  createHeatMap(userData);
};

**createHeatMap(userData);**

我不能为我的生活弄清楚是什么阻止了它的运行？如果来自for循环中的head(userData)，则打印出数据帧行。所以它正在获取数据帧。

Answer 1

评论中提到的这种困境的答案是打印（）热图。

R没有从for循环中完成函数调用

1 个答案: