animate_duration: Visualizing the spatio-temporal pattern of an outbreak’s...

In wenlab501/EpiTrans: R package for estimation of epidemic transmissibility in time and space

Visualizing the spatio-temporal pattern of an outbreak’s transmision potential

Description

Generate animation of the spatial points of cases by day with a specific duration time

Usage

animate_duration(
  x,
  y,
  t,
  dt = 7,
  Rj = NULL,
  crs = NULL,
  bnd = NULL,
  basemap = NULL,
  gridLonLat = TRUE,
  width = 600,
  height = 400,
  delay = 20,
  title = ""
)

Arguments

x	Vector of x coordinates of data points.
y	Vector of y coordinates of data points.
t	Vector of time of data points.
dt	Day of the duration time.
Rj	Vector of individual reproductive numbers of data points.
crs	Coordinate reference system of data points: numeric (EPSG code), object of class 'crs', or input string for st_crs; if NULL, using CRS of basemap, or using WGS84 (EPSG:4326).
bnd	A 4-length numerical vector of the form c(xmin, ymin, xmax, ymax) which gives the number of x and y coordinates' ranges of the map.
basemap	Object of class 'sf'; basemap plotting on map.
gridLonLat	Logical; draw latitude and longitude grid on non-interactive map.
width	Width of the animation file (in pixels).
height	Height of the animation file (in pixels).
delay	Delay time between images (in 1/100th of a second).
title	Main title of animation.

Examples

data("EpiTrans")

res_adj = Rj(t = dengue$date, x = dengue$long, y = dengue$lat,GI.pdf = lpdf_GI(),SW.pdf = lpdf_SW(), adjSP = TRUE)
dengue$Rj = res_adj$Rj
dengue = dengue[dengue$date > as.Date("2007-09-15") & dengue$date < as.Date("2007-10-15"),]

animate_duration(x = dengue$long, y = dengue$lat,t = dengue$date,dt = 7,Rj = dengue$Rj, basemap = Taiwan)

wenlab501/EpiTrans documentation built on July 8, 2022, 9:14 a.m.