Commit 234fa612 authored by Laura Poggio's avatar Laura Poggio

points tutorial R

parent 706f8a15
......@@ -49,15 +49,13 @@ data_igh=data.frame(st_coordinates(spdata_igh),id=spdata_igh$my_id)
fun_pixel_values=function(rowPX,data,VOI,VOI_LYR){
as.numeric(
gdallocationinfo(
srcfile=paste0(webdav_path,"/",VOI,"/", VOI_LYR),
srcfile=paste0(webdav_path,"/",VOI,"/", VOI_LYR,".vrt"),
x=data[rowPX,"X"],
y=data[rowPX,"Y"],
geoloc=TRUE,
valonly=TRUE))
}
}
value_pixels=unlist(lapply(1:3,function(x){fun_pixel_values(x,data_igh,voi,voi_layer)}))
```
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment