subunit_head | R Documentation |
subunit_head
Calculates the pressure at the beginning of the manifold
line for a given average flow rate
subunit_head(
q_req_subunit,
d_manifold,
s_manifold,
s_ini_manifold = s_manifold,
n_manifold,
dec_manifold,
d_lateral,
s_lateral,
s_ini_lateral = s_lateral,
n_lateral,
dec_lateral,
coef_em,
exp_em,
q_unit = q_unit
)
q_req_subunit |
Average flow required on the subunit, m3/s |
d_manifold |
Diameter of the manifold line, meter |
s_manifold |
Spacing between lateral lines in the manifold line, meter |
s_ini_manifold |
Spacing of the initial section of the manifold line, meter |
n_manifold |
Number of lateral lines in the manifold line |
dec_manifold |
Slope of the manifold line, decimal |
d_lateral |
Diameter of the lateral line, milimeter |
s_lateral |
Spacing between emitters on the lateral line, meter |
s_ini_lateral |
Spacing of the initial stretch of the lateral line, meter |
n_lateral |
Number of issuers on the lateral line |
dec_lateral |
Lateral line slope, decimal |
coef_em |
Coefficient of the flow-pressure equation of the emitter |
exp_em |
Exponent of the flow-pressure equation of the emitter |
... |
additional parameters |
args_subunit_head <- list(
q_req_subunit = 2.2222e-6*3600000,
d_manifold = 40, s_manifold = 6, s_ini_manifold = 10, n_manifold = 8, dec_manifold = 0.02,
d_lateral = 16, s_lateral = 1, s_ini_lateral = 4, n_lateral = 40, dec_lateral = -0.01,
coef_em = 6.41e-7*3600000, exp_em = 0.54, q_unit="l/h"
)
do.call(subunit_head, args_subunit_head)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.