R manual: local.scan, note that 'weighted' might be ignored.