Skip to content

SPGWR - gw.adapt() command question

2 messages · Paul Bidanset, Roger Bivand

#
On Wed, 10 Jul 2013, Paul Bidanset wrote:

            
If you do not provide a reproducible example, the only conclusion is that 
your usage of the function - which is used internally rather than by users 
- is incorrect. I can reproduce your artefact by using quant > 1, that is 
more than 100% of points included in the pointwise bandwidths:

library(spgwr)
data(columbus)
col.bw <- gwr.sel(crime ~ income + housing, data=columbus, 
coords=cbind(columbus$x, columbus$y), adapt=TRUE)
gw.adapt(cbind(columbus$x, columbus$y), cbind(columbus$x, columbus$y),
   quant=col.bw)
gw.adapt(cbind(columbus$x, columbus$y), cbind(columbus$x, columbus$y),
   quant=0.1)
gw.adapt(cbind(columbus$x, columbus$y), cbind(columbus$x, columbus$y),
   quant=0.9)
gw.adapt(cbind(columbus$x, columbus$y), cbind(columbus$x, columbus$y),
   quant=0.99)
gw.adapt(cbind(columbus$x, columbus$y), cbind(columbus$x, columbus$y),
   quant=15)

Is this your scenario?

Roger