This panel function can be used to add locfit fits to plots generated by trellis.
Currently it works with
xyplot for 1-d fits
and crudely with
wireframe for 2-d fits.
Most Locfit arguments can be passed through
1 2 3 4 5 6 7 8 9 10 11 12 13 14
stopifnot(require(lattice)) # a simple multi-panel display data(ethanol, package="locfit") xyplot(NOx ~ E | C, data=ethanol, panel=panel.locfit) # The second example uses some Locfit optional arguments. # Note we can pass the alpha (bandwidth) and family arguments directly to # xyplot. The cens argument must be given in full; not as a data frame variable. # The resulting plot does not (yet) distinguish the censored points, but # the fit will correctly apply censoring. data(border, package="locfit") xyplot(runs ~ day, data=border, panel=panel.locfit, family="poisson", alpha=0.3, cens=border$no)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.