# NOT RUN {
# peak discharge from a grassy meadow
peakd.meadow <- peak(intensity = 55, area = 1, c = 0.1)
# peak discharge from an urban area
peakd.urban <- peak(intensity = 55, area = 1, c = 0.8)
# }
Run the code above in your browser using DataLab