library(rPAex)
# Generation of cassava data
# download the TTC_0559_georeferenced.tif image from CIP DATAVERSE repository
# library(terra)
# img = "TTC_0559_georeferenced.tif"
# r<-rast(img)
# e = ext(287688, 287709, 8664174, 8664217)
# rc = crop(r, e)
# terra::image(rc) # Image cassava
# to use locator(), fourPoint() and imageField() to generate the cassava data
data(cassava)
# Contains 262056 pixels of 5 centimeters each with multispectral data
r<-terra::rast(cassava,type="xyz")
terra::image(r) # Image cassava
Run the code above in your browser using DataLab