Name: ie2misc
Owner: USGS-R
Description: A collection of Irucka Embry's miscellaneous USGS functions (processing .exp and .psf files, statistical error functions, "+" dyadic operator for use with NA, creating ADAPS and QW spreadsheet files, calculating saturated enthalpy). Irucka created these functions while a Cherokee Nation Technology Solutions (CNTS) United States Geological Survey (USGS) Contractor and/or USGS employee.
Created: 2016-07-29 16:40:22.0
Updated: 2017-07-31 20:11:07.0
Pushed: 2016-07-19 01:24:44.0
Size: 152
Language: R
GitHub Committers
| User | Most Recent Commit | # Commits |
|---|
Other Committers
| User | Most Recent Commit | # Commits |
|---|
R package that contains Irucka Embry's miscellaneous USGS functions (processing .exp and .psf files, statistical error functions, “+” dyadic operator for use with NA, creating ADAPS and QW spreadsheet files, calculating saturated enthalpy, etc.). Irucka created these functions while a Cherokee Nation Technology Solutions (CNTS) United States Geological Survey (USGS) Contractor and/or USGS employee.
all.packages("ie2misc")
ary(ie2misc)
ire(stats)
Calculate the mean-absolute deviation (MAD)
seed(1003) # makes the example reproducible
<- rnorm(1003) # observed
ing the default value of na.rm = FALSE
ing a matrix of the numeric vector obs1
<- matrix(data = obs1, nrow = length(obs1), ncol = 1, byrow = FALSE,
ames = list(c(rep("", length(obs1))), "Observed"))
tat(mat1)
Compute the index of agreement (dr)
seed(300) # makes the example reproducible
<- rnorm(300) # observed
<- rnorm(300) # predicted
ing the default value of na.rm = FALSE
ing a matrix of the numeric vectors pre and obs
<- matrix(data = c(obs, pre), nrow = length(pre), ncol = 2, byrow = FALSE,
ames = list(c(rep("", length(pre))), c("Predicted", "Observed")))
at[, 2], mat[, 1])
Produce a saturated enthalpy table and direct the output to the console
enthalpy2(elevation = 1810, tbegin = 28, tend = 80, tincrement = 0.1,
ut = "console")
evation = 120 feet, tbegin = 32 degrees F, tend = 100 degrees F,
ncrement = 0.1 degrees F
Create an .xlsx spreadsheet for each of the following water-quality data
ts (follow the file dialog):
1 <- "http://waterdata.usgs.gov/nwis/dv?cb_80154=on&format=rdb"
2 <- "&site_no=03584500&referred_module=sw&period=&begin_date=1904-07-01"
3 <- "&end_date=2016-06-22"
4 <- paste0(file1, file2, file3) # used to truncate the file name
file4)
GS 03584500 ELK RIVER NEAR PROSPECT, TN
spended sediment concentration, milligrams per liter (Mean)
5 <- "http://waterdata.usgs.gov/nwis/dv?cb_80155=on&format=rdb"
6 <- "&site_no=03584500&referred_module=sw&period=&begin_date=1904-07-01"
7 <- "&end_date=2016-06-22"
8 <- paste0(file5, file6, file7) # used to truncate the file name
file8)
GS 03584500 ELK RIVER NEAR PROSPECT, TN
spended sediment discharge, tons per day (Mean)
This software is in the public domain because it contains materials that originally came from the U.S. Geological Survey, an agency of the United States Department of Interior. For more information, see the official USGS copyright policy
Although this software program has been used by the U.S. Geological Survey (USGS), no warranty, expressed or implied, is made by the USGS or the U.S. Government as to the accuracy and functioning of the program and related program material nor shall the fact of distribution constitute any such warranty, and no responsibility is assumed by the USGS in connection therewith.
This software is provided “AS IS.”
Note: The datasets included in the extdata folder may not have received the USGS's Director's approval and thus may still be provisional and subject to revision. The data are included in this package for illustration purposes only. The data are released on the condition that neither the USGS nor the United States Government may be held liable for any damages resulting from its authorized or unauthorized use.