# Result: Manning's n of 0.028
material <- 'Earth'
irregularity <- 'Smooth'
cross <- 'Gradual'
obstructions <- 'Negligible'
vegetation <- 'Low'
meandering <- 'Minor'
n_cowan1956(material,irregularity,cross,obstructions,vegetation,meandering)
# Result: Manning's n of 0.075
material <- 'Rock Cut'
irregularity <- 'Minor'
cross <- 'Alternating occasionally'
obstructions <- 'Minor'
vegetation <- 'Medium'
meandering <- 'Appreciable'
n_cowan1956(material,irregularity,cross,obstructions,vegetation,meandering)
# Result: Manning's n of 0.142
material <- 'Fine Gravel'
irregularity <- 'Moderate'
cross <- 'Alternating frequently'
obstructions <- 'Appreciable'
vegetation <- 'High'
meandering <- 'Severe'
n_cowan1956(material,irregularity,cross,obstructions,vegetation,meandering)
Run the code above in your browser using DataLab