Simulate overlap from adjacent laterals using data from one lateral.

overlap(sl,sc,lcdata,rcdata)

Arguments

sl

lateral spacing.

sc

catch can spacing perpendicular to lateral.

lcdata

data from cans left of lateral; order is proximal to distal of lateral.

rcdata

data from cans right of lateral; order as in lcdata.

Details

Superimposes and sums one row of catch can data as if adjacent lateral had same catch pattern. Repeat function for multiple rows of catch cans between laterals, to normally include all rows of cans between two sprinklers.

Value

A named list with the following items:

sum.left

numeric array of summed overlap catch can data between tested lateral and simulated lateral to the left.

sum.right

numeric array of summed overlap catch can data between tested lateral and simulated lateral to the right.

Author

Garry Grabow glgrabow@ncsu.edu

Note

both items of list will have same summed values but in inversely ordered. Only can data receiving water need to be entered into lcdata and rcdata. The function will automatically produce "phantom cans" to fill between adjacent laterals if not entered and set catch to 0.

Examples

sl<-60 #lateral spacing. Units are feet
sc<-10 #catch cans spacing along single "row". Units are feet
#note that neither lcdata or rcdata have 6 cans. function will generate "0" cans.
lcdata<-c(0.28,0.24,0.21,0.10)
rcdata<-c(0.23,0.21,0.3)
#generate summed catch for one row at 60 foot lateral spacing
spacing.60<-overlap(sl,sc,lcdata,rcdata)
spacing.60
#> $sum.left
#> [1] 0.28 0.24 0.21 0.40 0.21 0.23
#> 
#> $sum.right
#> [1] 0.23 0.21 0.40 0.21 0.24 0.28
#> 
#now generate summed catch assuming a 50 foot lateral spacing
sl<-50
spacing.50<-overlap(sl,sc,lcdata,rcdata)
spacing.50
#> $sum.left
#> [1] 0.28 0.24 0.51 0.31 0.23
#> 
#> $sum.right
#> [1] 0.23 0.31 0.51 0.24 0.28
#>