SiZer(x, bw, gridsize, scaleData=FALSE, signifLevel=0.05, plotSiZer=TRUE,
logbw=TRUE, xlim, xlab, addLegend=TRUE, posLegend="bottomright") SiCon(x, bw, gridsize, scaleData=FALSE, signifLevel=0.05, plotSiCon=TRUE,
logbw=TRUE, xlim, xlab, addLegend=TRUE, posLegend="bottomright")
featureSignifdata(earthquake)
eq3 <- -log10(-earthquake[,3])
SiZer(eq3)
SiCon(eq3)Run the code above in your browser using DataLab