如何在R / ggplot2中创建数据的阶梯图？

Question

我有一个点列表，我想绘制它们并用楼梯台阶连接它们，如下面的截图所示。

df <- read.table('out.dat')
df <- df[df$V1>0,]
st <- stats.bin(x=df$V1, y=df$V2, N=100)
df2 <- as.data.frame(st$stats["mean",])
names(df2) <- c('mean.energy')
plot(df2$mean.energy, type="s",
    xlab="Off-axis distance (mm)", ylab="Mean Energy (MeV)")

我怎么能用ggplot2实现同样的目标？

Answer 1

这适用于qplot（）：

qplot(seq_along(df2$mean.energy), df2$mean.energy, geom="step")

与ggplot（）语法相同：

ggplot(df2) +
geom_step(aes(x=seq_along(df2$mean.energy), y=df2$mean.energy)) +
xlab("Off-axis distance (mm)") +
ylab("Mean Energy (MeV)") + theme_bw()