Skip to contents

Estimate pipe friction factor with Buzelli formula

Source: R/fric_buzelli.R
fric_buzelli.Rd

Estimate Darcy friction factor explicitly with extremely accurate Buzelli approximation of Colebrook equation.

Usage

fric_buzelli(reynolds, roughness = 0, strict = FALSE)

Arguments

reynolds

Reynolds number, []. Type: assert_double.

roughness

relative roughness, []. Type: assert_double.

strict

calculate only inside the precision region. Type: assert_flag.

Value

pipe friction factor, []. Type: assert_double.

Details

Buzelli's formula is reported to be extremely accurate in the region:

  • 3.0e3 <= reynolds <= 3.0e8

  • 0 <= roughness <= 0.05

In strict = TRUE mode argument values outside this precision region are not allowed, whereas in strict = FALSE either NAs are generated in that case or calculation for laminar flow is performed when reynolds < 2100.0.

References

  1. Offor, U. and Alabi, S. (2016) An Accurate and Computationally Efficient Explicit Friction Factor Model. Advances in Chemical Engineering and Science, 6, pp. 237-245. doi:10.4236/aces.2016.63024 .

  2. Buzzelli, D. (2008) Calculating friction in one step. Machine Design, 80 (12), pp. 54–55.

See also

Other Fluid properties: fric_romeo(), fric_vatankhan(), re_u()

Examples

 library(pipenostics)

 fric_buzelli(c(2118517, 2000, 2118517), c(1e-6, 70e-3/1, 7e-3/1))
#> [1] 0.01031468 0.03200000 0.03375076
 # [1] 0.01031468 0.03200000 0.03375076  # []

 fric_buzelli(c(2118517, 5500, 2118517), c(1e-6, 50e-3/1, 7e-3/1), TRUE)
#> [1] 0.01031468 0.07556734 0.03375076
 # [1] 0.01031468 0.07556734 0.03375076