R 这个图叫什么?如何使用ggplot2绘制?
考虑一个类似顶部的图: 我想重新创建这种图(曲线散点图),它指示样本通过围绕中间带的曲线的扩散。到目前为止,我的搜索还没有成功 有谁知道:R 这个图叫什么?如何使用ggplot2绘制?,r,plot,ggplot2,scatter,R,Plot,Ggplot2,Scatter,考虑一个类似顶部的图: 我想重新创建这种图(曲线散点图),它指示样本通过围绕中间带的曲线的扩散。到目前为止,我的搜索还没有成功 有谁知道: 这个情节叫什么 如何使用ggplot2创建此绘图 是否可以使用geom_point()绘制每个分类变量具有等距点的散点图 原始资料来源:是否只是对其他离散点进行排序和分隔?你可以相当容易地制作你自己的几何图形(参见)/也许类似的东西 StatSlide <- ggproto("StatSlide", Stat, compute_group = f
ggplot2
创建此绘图李>
geom_point()
绘制每个分类变量具有等距点的散点图原始资料来源:是否只是对其他离散点进行排序和分隔?你可以相当容易地制作你自己的几何图形(参见)/也许类似的东西
StatSlide <- ggproto("StatSlide", Stat,
compute_group = function(data, scales) {
data$y <- sort(data$y)
data$x <- data$x + seq( -.4, .4, length.out = nrow(data))
data
},
required_aes = c("x", "y")
)
stat_slide <- function(mapping = NULL, data = NULL, geom = "point",
position = "identity", na.rm = FALSE, show.legend = NA,
inherit.aes = TRUE, ...) {
layer(
stat = StatSlide, data = data, mapping = mapping, geom = geom,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list(na.rm = na.rm, ...)
)
}
# test it out
ggplot(mpg) +
stat_slide(aes(drv, displ, color=drv))
StatSlide