Warning messages: 1: In min(x) : no non-missing arguments to min; returning Inf 2: In max(x) : no non-missing arguments to max; returning -Inf 3: In min(diff(sort(x))) : no non-missing arguments to min; returning Inf 4: Removed 1 rows containing missing values (`geom_tile()`).

这些警告信息通常表示你的数据中存在缺失值或者无法计算的值，导致函数无法正常工作。在贪吃蛇游戏中，这些警告信息可能是由于蛇的位置数据发生了问题，或者食物的位置数据发生了问题，导致无法正确绘制游戏界面。

你可以尝试添加一些调试信息，例如在 `update_game()` 函数中添加以下代码：

print(snake)
print(food)

运行游戏后，当出现警告信息时，你可以查看 R 控制台中输出的蛇的位置和食物的位置，以便更好地定位问题。

另外，你也可以检查蛇的位置和食物的位置是否有缺失值或者非法值，例如超出了游戏窗口的范围，或者不是整数值等。如果出现了这些问题，你可以尝试修复它们，以便程序能够正常工作。

相关问题

> plot(cls) Error in plot.window(...) : 'xlim'值不能是无限的 In addition: Warning messages: 1: In min(x) : no non-missing arguments to min; returning Inf 2: In max(x) : no non-missing arguments to max; returning -Inf

这个错误和警告信息通常出现在使用`plot()`函数绘制`zoo`对象时，其中`cls`对象包含无穷大或缺失值。请使用`na.omit()`函数删除缺失值并使用`is.finite()`函数删除无穷大值。例如，您可以使用以下代码：

# 删除缺失值和无穷大值
cls_clean <- na.omit(cls)
cls_clean <- cls_clean[is.finite(cls_clean)]

# 绘制zoo对象
plot(cls_clean)

这将删除缺失值和无穷大值，并绘制一个干净的`zoo`对象。如果问题仍然存在，请提供更多代码和数据信息，以便我可以更好地帮助您解决问题。

Warning messages: 1: In min(column, na.rm = TRUE) : no non-missing arguments to min; returning Inf 2: In max(column, na.rm = TRUE) : no non-missing arguments to max; returning -Inf

这些警告信息通常意味着在数据中存在缺失值，导致在执行min()或max()函数时无法得到有意义的结果。如果你想要忽略缺失值，可以使用参数na.rm=TRUE，如min(column, na.rm=TRUE)和max(column, na.rm=TRUE)。如果你想要处理缺失值，可以使用函数如na.omit()或complete.cases()来删除或填充缺失值。