使用 pycnophylactic 插值的简单 R 3d 插值/曲面图答案

【问题标题】：simple R 3d interpolation / surface plot using pycnophylactic interpolation使用 pycnophylactic 插值的简单 R 3d 插值/曲面图
【发布时间】：2017-09-06 08:27:41
【问题描述】：

我想从一组点 (x,y,z) 创建一个 3d 表面，就像这个场景 simple R 3d interpolation/surface plot 但使用称为 pycnophylactic 的特定插值方法。有一个名为 pycno 的包使用这种方法，但我是 R 的新手，不能很好地理解我该怎么做。谁能帮帮我，提供一个样本？我的数据是这样的：

x <- c(-19.915909,-19.918794,-19.914678,-1.991492,-19.916232)
y <- c(-43.942983,-43.943198,-43.940344,-43.942168,-43.939507)
z <- c(7.910,5.693,6.958,7.116,790.843)

提前致谢！

【问题讨论】：

标签： r 3d interpolation surface

【解决方案1】：

我使用“akima”包来插入 z 变量。以下是 3D 绘图查找 x、y 和 z 的方式。

dens <- akima::interp(x,y,z, duplicate = "mean")
plot_ly(x=dens$x,y=dens$y,z=dens$z) %>% add_surface()

【讨论】：