基于R中的一组3d数据点的插值的返回值

Question

我有一组3D数据（x，y，z），其中x和y表示2D模型中某些点的坐标，z是这些点的温度点。

我需要帮助才能执行以下操作：

1. 执行3D插值并在指定区域内绘制轮廓 即在模型边界内。数据如下。
2. 基于上述插值，返回给定的z值 点，例如x = 8.55，y = 3.25坐标。

x，y，z数据在this文件click the link中提供。

x1，y1：指定区域的坐标（模型边界）：

x1= c(-5,-5, 0, 18, 25, 25, -5)
y1= c(-5, 0,  0, 10.5, 10.5,-5, -5)

感谢 奥利