R/parseDollars.R

In sbgraves237/Ecfun: Functions for 'Ecdat'

Defines functions parseDollars

Documented in parseDollars

parseDollars <- function(x, pattern='\\$|,', replacement='', ...){
    X <- gsub(pattern, replacement, x, ...)
    as.numeric(X)
}