japan {RivRetrieve}

japan

Description

Retrieve Japanese gauge data

Usage

japan(
  site,
  variable = "discharge",
  start_date = NULL,
  end_date = NULL,
  sites = FALSE,
  ...
)

Arguments

site

Japanese gauge number

variable

Character. Either stage or discharge.

start_date

Character. Optional start date with format YYYY-MM-DD. Default is 1900-01-01.

end_date

Character. End date with format YYYY-MM-DD. Default is the current date.

sites

Logical. If TRUE, returns a list of measurement sites.

...

Additional arguments. None implemented.

Value

data frame of discharge time-series

Examples

## Not run: 
start_date <- as.Date("2019-01-01")
end_date <- as.Date("2022-12-31")
df <- japan("301011281104010", "discharge", start_date, end_date)
plot(df$Date, df$Q, type='l')

## End(Not run)