返回R中地理加权回归（GWR）的全局R2

我使用

spgwr

库在

R

中运行了地理加权回归（GWR），现在我想返回准全局R2（模型拟合）。我已经用

summary（gwr\u模型）

挖掘了结果，但是我还没有找到提取这个值的方法。有什么想法吗

可复制示例

库（spgwr）
#加载数据
数据中心（哥伦布）
#计算最佳内核带宽
col.bw gwr（公式=犯罪~收入+住房，数据=哥伦布，coords=cbind（哥伦布$x，
#>哥伦布$y），带宽=col.bw，hatmatrix=TRUE）
#>核函数：gwr.Gauss
#>固定带宽：2.275
#>数据点GWR系数估算汇总：
#>最小第一节中间第三节最大全局
#>拦截。23.2332 54.1252 63.9024 68.7564 80.9009  68.62
#>收入-3.1307-1.9129-0.9844-0.3686 1.2911-1.60
#>住房-1.0528-0.3767-0.0974 0.0301 0.7946-0.27
#>数据点数量：49
#>有效参数数（剩余：2traceS-traceS）：29.62
#>有效自由度（剩余：2traceS-traceS）：19.38
#>西格玛（剩余：2traceS-traceS）:8.027
#>有效参数数（型号：记录道）：23.93
#>有效自由度（模型：迹线）：25.07
#>西格玛（模型：痕迹）：7.058
#>西格玛（ML）：5.049
#>AICc（GWR第61页，等式2.33；第96页，等式4.21）：403.6
#>AIC（GWR第96页，等式4.22）：321.7
#>剩余平方和：1249
#>准全局R2:0.9071

如果你想要的是得到“准全局R2”，这表明你至少可以计算它

qGlobalR2 <- (1 - (gwr_model$results$rss/gwr_model$gTSS))

---

qGlobalR2您是指
全局R2
还是
准全局R2
？您是指本地R2
gwr\u model$SDF$localR2
？
qGlobalR2 <- (1 - (gwr_model$results$rss/gwr_model$gTSS))