R/gwr.gauss.R

Defines functions gwr.gauss

Documented in gwr.gauss

# Copyright 2001-2008 Roger Bivand

gwr.gauss <- function(dist2, bandwidth) {
	w <- exp((-dist2)/(bandwidth^2))
	w
}

gwr.Gauss <- function (dist2, bandwidth) {
     w <- exp((-0.5)*((dist2)/(bandwidth^2)))
     w
}

Try the spgwr package in your browser

Any scripts or data that you put into this service are public.

spgwr documentation built on Sept. 9, 2022, 3:04 p.m.