fetchBafuTable: Grab daily streamflow series out of BAFU pdf tables
In hydro-giub/hydroBE: Miscellaneous Functions of the Group of Hydrology Bern

Description Usage Arguments Value Note Author(s) Examples

The function returns daily streamflow series from pdf tables published by the BAFU (Bundesamt fuer Umwelt Schweiz) on the internet.

1	fetchBafuTable(id, year,param)

`id`	integer. The id of the gauging station of interest.
`year`	integer. The year for which to fetch the daily series.
`param`	character. Parameter (Q or P) for which to fetch the daily series; Q: streamflow, P: water level.

Data frame with columns 'date' (daily time steps), 'discharge' (daily mean streamflow), and 'preliminary'. The latter indicates whether the values are quality controlled and homogenised.

For a few gauging stations the pdf tables have a format different from the ones normally used. This most likely results in an error and holds in particular for the station at Aare Bruegg or some pdf tables containing data before the year 2004.

Original code provided by Jan S.

## Not run: 
## Muota at Ingenbohl
d <- fetchBafuTable(id='2084',year=2010, param='Q')
head(d)

## Sempachersee at Sempach
d <- fetchBafuTable(id='2168',year=2016, param='P')
head(d)
## End(Not run)