带有数据标签的stat_contour [英] stat_contour with data labels on lines

问题描述

我想知道如何在 ggplot2 的行上获取轮廓的数据标签。谢谢

I wonder how to get data labels on lines in ggplot2 for contours. Thanks

require(grDevices) # for colours

x <- seq(-4*pi, 4*pi, len = 27)
y <- seq(-4*pi, 4*pi, len = 27)
r <- sqrt(outer(x^2, y^2, "+"))

rx <- range(x <- 10*1:nrow(volcano))
ry <- range(y <- 10*1:ncol(volcano))
ry <- ry + c(-1, 1) * (diff(rx) - diff(ry))/2

plot(
    x = 0
  , y = 0
  , type = "n"
  , xlim = rx
  , ylim = ry
  , xlab = ""
  , ylab = ""
  )

contour(
    x = x
  , y = y
  , z = volcano
  , add = TRUE
  )

library(ggplot2)
library(reshape2)
volcano3d <- melt(volcano)
names(volcano3d) <- c("x", "y", "z")

# Basic plot
v <- ggplot(volcano3d, aes(x, y, z = z))
v + stat_contour()

推荐答案

使用directlabels包和从

using directlabels package and picking solution from this

# Basic plot
v <- ggplot(volcano3d, aes(x, y, z = z))
library(directlabels)
v2 <- v + stat_contour(aes(colour = ..level..))
direct.label(v2)

这篇关于带有数据标签的stat_contour的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！