moveCloud: moveCloud

View source: R/moveCloud.R

moveCloudR Documentation

moveCloud

Description

Extract Cloud Cover Fraction (CCF) data for a set of coordinate pairs.

Usage

moveCloud(x, y, start, end, interval, data.path)

Arguments

x

Object of class SpatVector.

y

Object of class Date with observation dates of y.

start

First data from when to download CCF data.

end

Last data from when to download CCF data.

interval

Daily interval of data download.

data.path

Output path for downloading data on cloud cover.

Details

The function extracts data on daily Cloud Cover Fractions (CCF) from NASA's Earth Observation (NEO). For a sequence of dates defined by start, end, and interval, the function downloads the correspondent CCF data and stores them in data.path. These data, which have a global coverage and a spatial resolution of 0.1 degrees, will only be downloaded if they do not already exist in data.path. When checking for existing data, the function will follow a standard naming convention, so data acquired independently will likely be missed. After downloading the needed data, the function will extract the CCF fraction values for all dates at the coordinates in x. This will be used to calculate the mean and standard deviation of the CCF at each date. In addition, the function will extract CCF data for each date in y that falls between start and end.

Value

A list containing:

  • x.stats - CCF statistics at each entry in x

  • r.stats - CCF statistics at each unique date betweenstart and end summarized across the elements of x

  • x.plot - Plot of the data in x.stats.

  • r.plot - Plot of the data in r.stats.

References

https://cneos.jpl.nasa.gov/

See Also

sMoveRes tMoveRes

Examples

## Not run: 

 require(terra)

 # read movement data
 longMove <- read.csv(system.file('extdata',
 'longMove.csv', package="rsMove"))

 # convert observations to vector
 longMove = vect(longMove, geom=c("long","lat"), crs="EPSG:4326")

 # test function for 30 day buffer
 obs.dates <- as.Date(longMove$timestamp)
 c.cover <- moveCloud(shortMove, obs.dates)


## End(Not run)

RRemelgado/rsMove documentation built on June 3, 2024, 10:07 p.m.