R/energybalance_functions.R
heat_transfer_coefficient.Rd
The function estimates the heat transfer coefficient for various taxa based on empirical measurements (Mitchell 1976) .
heat_transfer_coefficient(u, D, K, nu, taxon = "cylinder")
numeric
air velocity (m s-1).
numeric
characteristic dimension (e.g., diameter or snout-vent length) (meters).
numeric
thermal conductivity of air (W K-1 m-1), can calculate using DRYAIR
or WETAIR
.
numeric
kinematic viscosity of air (m2 s-1), can calculate using DRYAIR
or WETAIR
.
character
which class of organism, current choices: "sphere"
, "cylinder"
, "frog"
, "lizard_surface"
, "lizard_elevated"
, "flyinginsect"
, "spider"
.
"cylinder"
assumes 40 < Re < 4000. "lizard_surface"
and "lizard_elevated"
assume the lizard is prostrate on and elevated above the surface, respectively. The values are the average for lizards parallel and perpendicular to the air flow.
numeric
heat transfer coefficient, H_L
(W K-1 m-2).
Mitchell JW (1976). “Heat transfer from spheres and other animal forms.” Biophysical Journal, 16(6), 561-569. ISSN 0006-3495, doi:10.1016/S0006-3495(76)85711-6 .
Other biophysical models:
Grashof_number_Gates()
,
Grashof_number()
,
Nusselt_from_Grashof()
,
Nusselt_from_Reynolds()
,
Nusselt_number()
,
Prandtl_number()
,
Qconduction_animal()
,
Qconduction_substrate()
,
Qconvection()
,
Qemitted_thermal_radiation()
,
Qevaporation()
,
Qmetabolism_from_mass_temp()
,
Qmetabolism_from_mass()
,
Qnet_Gates()
,
Qradiation_absorbed()
,
Qthermal_radiation_absorbed()
,
Reynolds_number()
,
T_sky()
,
Tb_CampbellNorman()
,
Tb_Gates2()
,
Tb_Gates()
,
Tb_butterfly()
,
Tb_grasshopper()
,
Tb_limpetBH()
,
Tb_limpet()
,
Tb_lizard_Fei()
,
Tb_lizard()
,
Tb_mussel()
,
Tb_salamander_humid()
,
Tb_snail()
,
Tbed_mussel()
,
Tsoil()
,
actual_vapor_pressure()
,
boundary_layer_resistance()
,
external_resistance_to_water_vapor_transfer()
,
free_or_forced_convection()
,
heat_transfer_coefficient_approximation()
,
heat_transfer_coefficient_simple()
,
saturation_vapor_pressure()
,
saturation_water_vapor_pressure()
heat_transfer_coefficient(u = 0.5,
D = 0.05,
K = 25.7 * 10^(-3),
nu = 15.3 * 10^(-6),
taxon = "cylinder")
#> [1] 9.936011