Returns air viscovisty for a given air temperature.

Share:

Description

Returns the air viscosity value for a given, supplied air temperature (Ta). Ta should be in units of oC.

Usage

1
airviscosity(Ta = 20)

Arguments

Ta

Air temperature in degrees Celsius. Default value is 20.

Value

Kinematic viscosity of air, as a function of temperature Units: m2/s Regression for 0 to 100oC range: Intercept<-13.17380952 Slope<-0.097457143 k<-(Intercept+Slope*Ta)*1e-6 # multiply by 1e-6 to get into m2/s units

Author(s)

Glenn J Tattersall

References

http://www.engineeringtoolbox.com/air-properties-d_156.html

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
## The function is currently defined as
function (Ta = 20) 
{
    Intercept <- 13.17380952
    Slope <- 0.097457143
    k <- (Intercept + Slope * Ta) * 1e-06
    k
  }
# Example calculation
Ta<-20
airviscosity(Ta)

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.