Open ChuliangXiao opened 6 years ago
GetProj function in geospatial.R
GetProj
geospatial.R
map_proj <- ncdf4::ncatt_get(coordNC, varid=0, attname="MAP_PROJ")$value cen_lat <- ncdf4::ncatt_get(coordNC, varid=0, attname="MOAD_CEN_LAT")$value cen_lon <- ncdf4::ncatt_get(coordNC, varid=0, attname="STAND_LON")$value truelat1 <- ncdf4::ncatt_get(coordNC, varid=0, attname="TRUELAT1")$value truelat2 <- ncdf4::ncatt_get(coordNC, varid=0, attname="TRUELAT2")$value
CEN_LAT and CEN_LON are specific to the nested domain. If available, MOAD_CEN_LAT and STAND_LON are should be used.
CEN_LAT
CEN_LON
MOAD_CEN_LAT
STAND_LON
TransUsgsProdStat function in usgs_ingest.R
TransUsgsProdStat
usgs_ingest.R
prodStatLookup <- c( X_00060_00011 ='Discharge (cfs)', ##instantaneous is 00011 but not worth saying IMO X_00060_00011_cd ='Discharge code', X_00065_00011 ='Stage (ft)', X_00065_00011_cd ='Stage code' ) code2Name <- any(names %in% names(prodStatLookup))
'Discharge (cfs)' in new USGS data is denoted by X_00060_00000 instead of X_00060_00011.
X_00060_00000
X_00060_00011
GetProj
function ingeospatial.R
CEN_LAT
andCEN_LON
are specific to the nested domain. If available,MOAD_CEN_LAT
andSTAND_LON
are should be used.TransUsgsProdStat
function inusgs_ingest.R
'Discharge (cfs)' in new USGS data is denoted by
X_00060_00000
instead ofX_00060_00011
.