2

当我使用 gstat 包在 R 中进行插值时，会出现类似“[反距离加权插值]”或“[普通或加权最小二乘预测]”的消息。例如：

library('sp')
library('gstat')
data(meuse)
coordinates(meuse) = ~x + y 
data(meuse.grid)
coordinates(meuse.grid) = ~x + y 
gridded(meuse.grid) <- TRUE
zn.tr1 <- krige(log(zinc) ~  x + y , meuse, meuse.grid)

[普通或加权最小二乘预测]

如何禁用该消息？

4

2 回答 2

6

或者将调试级别设置为低于默认值：

zn.tr1 <- krige(log(zinc) ~  x + y , meuse, meuse.grid, debug.level = 0)
于 2015-01-18T22:29:58.887 回答
2

存在多种停止输出的方法——最好的方法是函数可以选择抑制它。但是krige好像没有那个。

capture.output在这里工作：

> rm(zn.tr1)
> zn.tr1 # there is no zn.tr1
Error: object 'zn.tr1' not found
> z = capture.output(zn.tr1 <- krige(log(zinc) ~  x + y , meuse, meuse.grid))
> str(zn.tr1) # there is now
Formal class 'SpatialPixelsDataFrame' [package "sp"] with 7 slots
  ..@ data       :'data.frame': 3103 obs. of  2 variables:
  .. ..$ var1.pred: num [1:3103] 6.16 6.18 6.14 6.1 6.19 ...

输出消息本身被返回并存储在z

> z
[1] "[ordinary or weighted least squares prediction]"

但是，如果您不打印它，您将看不到它。

于 2014-11-25T14:31:43.717 回答