谢谢罗伯特。您的解决方案(当然!)要好得多,因为执行速度要快得多。但是,readValues
从帮助页面中不容易理解的行为。经过几次测试,我了解到这取决于SpatRaster
内存中的存在与否:
logo <- rast(system.file("ex/logo.tif", package="terra"))
# the SpatRaster is in a file, no value returned
readValues(logo,row=35, nrows=3, col=50, ncols=3, mat=TRUE)
# red green blue
logo2 <- logo*1
# the SpatRaster is in memory, readValues works
readValues(logo2,row=35, nrows=3, col=50, ncols=3, mat=TRUE)
# red green blue
# [1,] 155 168 220
# [2,] 167 176 231
# [3,] 165 175 226
# ...
当源是文件时,SpatRaster
必须先“打开”:
logo <- rast(system.file("ex/logo.tif", package="terra"))
readStart(logo)
readValues(logo,row=35, nrows=3, col=50, ncols=3, mat=TRUE)
# red green blue
# [1,] 155 168 220
# [2,] 167 176 231
# [3,] 165 175 226
# ...
readStop(logo)
那是赖特吗?SpatRaster
如果是这样,也许应该在帮助页面的某处提到文件处理和内存处理之间的这种区别read and write
。
readValues
此外,在extract
帮助页面中提及作为一个函数可能会有所帮助see also
,因为它是高度相关的(并且对于提取块更有效)。
最后,以下脚本引发错误:
logo <- rast(system.file("ex/logo.tif", package="terra"))
readValues(logo,row=35, nrows=3, col=50, ncols=3, mat=TRUE)
# red green blue
readStart(logo)
# Error: [readStart] the file is not open for reading
错误的调用readValues
似乎对以下内容有副作用readStart
,但情况并非如此。