Description Usage Arguments Author(s) References Examples
View source: R/plot.varianceMapOut.R
Takes as input a varianceMapOut object from the function varianceMap. This plotting function makes a countour plot of the non-parametric regression standard error surface.
1 2 |
x |
An object of type varianceMapOut returned by varianceMap. |
... |
Other arguments to be passed to functions plot, points, lines. |
Ronald P. Barry
Julie McIntyre, Ronald P. Barry (2018) A Lattice-Based Smoother for Regions with Irregular Boundaries and Holes. Journal of Computational and Graphical Statistics. In Press.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | data(nparExample)
attach(nparExample)
plot.new()
# Simulate a response variable
index1 <- (grid2[,2]<0.8)|(grid2[,1]>0.6)
Z <- rep(NA,length(grid2[,1]))
n1 <- sum(index1)
n2 <- sum(!index1)
Z[index1] <- 3*grid2[index1,1] + 4 + rnorm(n1,0,sd=0.4)
Z[!index1] <- -2*grid2[!index1,1] + 4 + rnorm(n2,0,sd=0.4)
#
plot(polygon2,type="n")
polygon(polygon2)
points(grid2,pch=19,cex=0.5,xlim=c(-0.1,1))
text(grid2,labels=round(Z,1),pos=4,cex=0.5)
#
nodeFillingOutput <- nodeFilling(poly=polygon2, node_spacing=0.025)
plot(nodeFillingOutput)
formLatticeOutput <- formLattice(nodeFillingOutput)
plot(formLatticeOutput)
hold <- crossvalNparReg(formLatticeOutput,Z,
PointPattern=grid2,M=0.5,max_steps = 25)
var_map <- varianceMap(formLatticeOutput,Z,
PointPattern=grid2,M=0.5,k=hold$k)
plot(var_map)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.