使用 ggplot2 進行表面繪圖

Question

是否有可能將 plot 與 ggplot2 3D 表面呈現為 (x, y, z)-vector 並標記輪廓線？

所需結果顯示在帶有輪廓線的表面 map下方

Answer 1

這正是 geomtextpath package 的構建目的。

從?geomtextpath::geom_textcontour復制的示例

library(geomtextpath)
#> Loading required package: ggplot2
df <- expand.grid(x = seq(nrow(volcano)), y = seq(ncol(volcano)))
df$z <- as.vector(volcano)

ggplot(df, aes(x, y, z = z)) +
  geom_contour_filled(bins = 6, alpha = 0.6) +
  geom_textcontour(bins = 6, size = 2.5, padding = unit(0.05, "in")) +
  scale_fill_manual(values = terrain.colors(11)) +
  theme_classic() +
  theme(legend.position = "none")

^{創建於 2023-01-26，使用reprex v2.0.2}