R中的循环内的等高线图

Question

尽管我逐个绘制轮廓，但在循环中绘制它们或使用sapply时我会收到一条错误消息

这是我的数据框： https://www.dropbox.com/s/k2xmcc8zsb0wufk/df.csv

require(akima)
require(fields)
for (i in 0:10)  
{ 
  h=levels(loggers$hour)[i] 
  x=loggers[loggers$hour==h,6]
  y=loggers[loggers$hour==h,7]
  z=loggers[loggers$hour==h,
### Interpolate
tmp = interp(x,y,z)
### Plot interpolation
contour(tmp, add=F)
}

任何提示？ 提前致谢 Agus的

Answer 1

您的代码中存在错误。 z=loggers[loggers$hour==h,缺少括号。另外，当您说for (i in 0:10)时，您会h=levels(loggers$hour)[0]返回character(0)。希望这会有所帮助。