R/cfs_to_acft.R

In cmichaud92/UCRBtools: Useful Functions for Data Manipulation, Analysis and Visualization

############################################################
#                    cfs_to_acft                           #
############################################################

cfs_to_acft <- function(mean_dis, period) {
    mean_dis * 1.9835 * period
}