Создание фиксированной пропускной способности географически взвешенных регрессий
Я новичок в R и пытаюсь разработать регрессии с географической взвешенностью, используя некоторый код, который был разработан Роджером Бивандом для R. Пожалуйста, смотрите справку (gwr) для обсуждения кода. С помощью моего профессора я смог заставить его работать с адаптивной пропускной способностью:
библиотека (GWmodel)
DM<-gw.dist (dp.locat = Coords)
adaptive.bs1<- gwr.sel (OnTer_tory ~ CL + cinc + Allie_thUS + Остров + не имеет выхода к морю, adapt = TRUE, method = "cv", gweight = gwr.bisquare, Координаты = координаты)
gwr1<- gwr (OnTer_tory ~ CL + cinc + Allie_thUS + остров + не имеет выхода к морю, adapt = adaptive.bs1, gweight = gwr.bisquare, координаты = координаты, hatmatrix = TRUE)
Тем не менее, когда я пытаюсь с фиксированной пропускной способностью: fixed.bs1<- gwr.sel (OnTer_tory ~ CL + Cinc + Allie_thUS + Остров + Не имеет выхода к морю, Adapt = FALSE, method = "cv", gweight = gwr.bisquare, ords = ords)
gwr2<- gwr (OnTer_tory ~ CL + cinc + Allie_thUS + остров + не имеет выхода к морю, adapt = fixed.bs1, gweight = gwr.bisquare, координаты = координаты, hatmatrix = FALSE)
Я получаю следующую ошибку: gwr2 <- gwr (OnTer_tory ~ CL + cinc + Allie_thUS + Остров + Не имеет выхода к морю, + adapt = fixed.bs1, gweight = gwr.bisquare, координировать = координаты, hatmatrix = FALSE) Ошибка: (adapt <= 1) не соответствует действительности
Что я делаю неправильно?