它们是否有任何改进由geom_line()将多个点连接到ggplot2中的平滑可呈现线而产生的锯齿状线的过程?

     lai.se <- structure(list(DOS = structure(c(1L, 1L, 1L, 1L, 1L, 2L, 2L,
2L, 2L, 2L, 3L, 3L, 3L, 3L, 3L), .Label = c("D1", "D2", "D3"), class = "factor"),
    DAS = c(31L, 84L, 113L, 132L, 160L, 35L, 82L, 108L, 126L,
    146L, 37L, 83L, 94L, 113L, 134L), N = c(24L, 24L, 24L, 24L,
    24L, 24L, 24L, 24L, 24L, 24L, 24L, 24L, 24L, 24L, 24L), LAI = c(1.5879167,
    4.3241667, 3.70375, 2.9704167, 0.1879167, 1.7679167, 3.7670833,
    3.4104167, 2.7879167, 0.195, 1.3179167, 3.5233333, 3.1604167,
    2.45875, 0.2758333), sd = c(0.4276323, 0.32478644, 0.34151596,
    0.3338638, 0.09868611, 0.18551876, 0.38212767, 0.31431747,
    0.35024189, 0.08836682, 0.16378616, 0.29256982, 0.28257326,
    0.44131535, 0.09536733), se = c(0.08729008, 0.06629675, 0.06971165,
    0.06814966, 0.02014422, 0.03786886, 0.07800148, 0.06415978,
    0.07149283, 0.0180378, 0.03343271, 0.05972057, 0.05768002,
    0.09008312, 0.01946677), ci = c(0.18057328, 0.13714529, 0.14420954,
    0.14097832, 0.04167149, 0.0783377, 0.16135836, 0.13272463,
    0.14789418, 0.03731404, 0.06916083, 0.1235414, 0.11932022,
    0.18635113, 0.04027009)), .Names = c("DOS", "DAS", "N", "LAI",
"sd", "se", "ci"), class = "data.frame", row.names = c(NA, -15L
))
    ggplot(lai.se, aes(x=DAS, y=LAI, colour=DOS)) +
  geom_errorbar(aes(ymin=LAI-se, ymax=LAI+se), colour ="black", size =.5, width=1, position=position_dodge(.9)) +
  geom_line() +
  geom_point()+ theme_bw()

使用这些代码创建的线是非常像素化的之字形线。他们有什么办法绘制更平滑的"solid"线(不是锯齿形的)吗?
   > sessionInfo()
R version 2.14.2 (2012-02-29)
Platform: i386-pc-mingw32/i386 (32-bit)

locale:
[1] LC_COLLATE=English_India.1252  LC_CTYPE=English_India.1252    LC_MONETARY=English_India.1252 LC_NUMERIC=C
[5] LC_TIME=English_India.1252

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base

other attached packages:
[1] ggplot2_0.9.2.1

loaded via a namespace (and not attached):
 [1] colorspace_1.1-1   dichromat_1.2-4    digest_0.5.2       grid_2.14.2        gtable_0.1.1       labeling_0.1
 [7] MASS_7.3-17        memoise_0.1        munsell_0.4        plyr_1.7.1         proto_0.3-9.2      RColorBrewer_1.0-5
[13] reshape2_1.2.1     scales_0.2.2       stringr_0.6.1      tools_2.14.2

最佳答案

我猜您正在尝试平滑一条线。这是您所追求的目标吗?

ggplot(lai.se, aes(x=DAS, y=LAI, colour=DOS)) +
  geom_errorbar(aes(ymin=LAI-se, ymax=LAI+se), colour ="black", size =.5, width=1, position=position_dodge(.9)) +
  geom_smooth() +
  geom_point()+ theme_bw()

关于r - 如何改善ggplot2中的锯齿状折线图?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/14323294/

10-12 13:17