This works with qplot():
qplot(seq_along(df2$mean.energy), df2$mean.energy, geom="step")
The same with the ggplot() syntax:
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()