Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/64.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 自动克里格会导致低分辨率绘图_R_Gis_Kriging - Fatal编程技术网

R 自动克里格会导致低分辨率绘图

R 自动克里格会导致低分辨率绘图,r,gis,kriging,R,Gis,Kriging,我使用R automap::autoKrige函数来插值缺失的降水值。虽然整体图像看起来不错,但我想知道为什么结果是块ish(低分辨率)。我想把边缘磨平 库(自动映射) #自动克里金法 fit_KRIG% .$krige_输出%>% as.data.frame()%>%#我们只保留感兴趣的数据 dplyr::select(X=x1,Y=x2,Z=var1.pred) #自动克里金法 内部克里格 library(automap) # Automatized Kriging fit_KRIG

我使用R automap::autoKrige函数来插值缺失的降水值。虽然整体图像看起来不错,但我想知道为什么结果是块ish(低分辨率)。我想把边缘磨平

库(自动映射)
#自动克里金法
fit_KRIG%
.$krige_输出%>%
as.data.frame()%>%#我们只保留感兴趣的数据
dplyr::select(X=x1,Y=x2,Z=var1.pred)
#自动克里金法
内部克里格
library(automap)
# Automatized Kriging  
fit_KRIG <- automap::autoKrige(    
  formula = precip ~ 1,                
  input_data = dspn
  
) %>% 
  .$krige_output %>%  
  as.data.frame() %>% # we keep only the data we are interested in
  dplyr::select(X = x1, Y = x2, Z = var1.pred) 

# Automatized Kriging
interp_KRIG <- raster::rasterFromXYZ(fit_KRIG, crs = geo_proj)
#plot(interp_KRIG)

#use Alps as mask
nnmsk <- mask(interp_KRIG,alps) 
plot(nnmsk)