SCM

SCM Repository

[latticeextra] Diff of /pkg/R/panel.2dsmoother.R
ViewVC logotype

Diff of /pkg/R/panel.2dsmoother.R

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 122, Mon Mar 29 04:33:26 2010 UTC revision 123, Thu Apr 8 05:42:20 2010 UTC
# Line 23  Line 23 
23      x <- x[subscripts]      x <- x[subscripts]
24      y <- y[subscripts]      y <- y[subscripts]
25      z <- z[subscripts]      z <- z[subscripts]
26        ok <- is.finite(x) & is.finite(y) & is.finite(z)
27        if (sum(ok) < 1)
28            return()
29        x <- x[ok]
30        y <- y[ok]
31        z <- z[ok]
32      data <- list(x = x, y = y, z = z)      data <- list(x = x, y = y, z = z)
33      mod <- do.call(method,      mod <- do.call(method,
34                     c(alist(form, data = data), args))                     c(alist(form, data = data), args))

Legend:
Removed from v.122  
changed lines
  Added in v.123

root@r-forge.r-project.org
ViewVC Help
Powered by ViewVC 1.0.0  
Thanks to:
Vienna University of Economics and Business Powered By FusionForge