calculate slope of rast object
A yearly rast object, which should have time attribute
c(year_begin, year_end)
The path of outputed tiff file. If specified, slope
and
pvalue
will be written into outfile
.
the function used to calculate slope, see slope()
for details.
other parameters ignored
logical. If TRUE
, outfile
is overwritten.
name of the progress bar to use, see
create_progress_bar
A terra rast object, with bands of slope
and pvalue
.
library(rtrend)
library(terra)
#> terra 1.7.55
f <- system.file("rast/MOD15A2_LAI_China_G050_2001-2020.tif", package = "rtrend")
r <- rast(f)
r
#> class : SpatRaster
#> dimensions : 80, 140, 20 (nrow, ncol, nlyr)
#> resolution : 0.5, 0.5 (x, y)
#> extent : 70, 140, 15, 55 (xmin, xmax, ymin, ymax)
#> coord. ref. : lon/lat WGS 84 (EPSG:4326)
#> source : MOD15A2_LAI_China_G050_2001-2020.tif
#> names : LAI, LAI, LAI, LAI, LAI, LAI, ...
#> min values : 0.000000, 0.000000, 0.000000, 0.00000, 0.000000, 0.000000, ...
#> max values : 5.692542, 5.479348, 5.585326, 5.33587, 5.822826, 5.533152, ...
#> time (days) : 2001-01-01 to 2020-01-01
time(r)
#> [1] "2001-01-01" "2002-01-01" "2003-01-01" "2004-01-01" "2005-01-01"
#> [6] "2006-01-01" "2007-01-01" "2008-01-01" "2009-01-01" "2010-01-01"
#> [11] "2011-01-01" "2012-01-01" "2013-01-01" "2014-01-01" "2015-01-01"
#> [16] "2016-01-01" "2017-01-01" "2018-01-01" "2019-01-01" "2020-01-01"
slp <- slope_rast(r,
period = c(2001, 2020),
outfile = "LAI_trend.tif", overwrite = TRUE,
fun = rtrend::slope_mk, .progress = "none"
)
# if you want to show progress, set `.progress = "text"`
slp
#> class : SpatRaster
#> dimensions : 80, 140, 2 (nrow, ncol, nlyr)
#> resolution : 0.5, 0.5 (x, y)
#> extent : 70, 140, 15, 55 (xmin, xmax, ymin, ymax)
#> coord. ref. : lon/lat WGS 84 (EPSG:4326)
#> source(s) : memory
#> names : slope, pvalue
#> min values : -0.01830315, 0
#> max values : 0.04475858, 1
plot(slp)
file.remove("LAI_trend.tif")
#> [1] TRUE