x <- c(0,7,8,14,15,120,242)
y <- c(122,128,130,158,110,110,92)
lowess(x,y)
$x
[1] 0 7 8 14 15 120 242
$y
[1] 122.0000 128.0000 132.2857 158.0000 110.0000 -4930.0000
110.0000
R version 2.2.1, 2005-12-20, i486-pc-linux-gnu
attached base packages:
[1] "methods" "stats" "graphics" "grDevices" "utils" "datasets"
[7] "base"
other attached packages:
lattice Hmisc chron
"0.12-11" "3.1-1" "2.3-8"
--
Frank E Harrell Jr Professor and Chair School of Medicine
Department of Biostatistics Vanderbilt University
______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.