calc2Node calculates Comfort Indices based on the 2-Node-Model by Gagge et al.
calc2Node(ta, tr, vel, rh, clo = 0.5, met = 1, wme = 0, sa = NULL, pb = 760,
ltime = 60, ht = 171, wt = 70, tu = 40, obj = "set", csw = 170, cdil = 120,
cstr = 0.5, varOut = "else", bodyPosition = 'sitting')returns a data.frame with the following items:
et - Effective temperaturetsens - Predicted thermal sensationdisc - Predicted discomfortps - Predicted percentage satisfied with the level of air movementpd - Predicted percentage dissatisfied due to draftpts - Predicted thermal sensation vote based on setpmvg - Gagge's version of Fanger's PMVpmvstar - Same as Fanger's PMV except that dry is calculated
using SET* rather than the operative temperature
The other functions return a single index, e.g. code(calcSET) returns the standard effective temperature.
a numeric value presenting air temperature in [degree C]
a numeric value presenting mean radiant temperature in [degree C]
a numeric value presenting air velocity in [m/s]
a numeric value presenting relative humidity [%]
a numeric value presenting clothing insulation level in [clo]
a numeric value presenting metabolic rate in [met]
a numeric value presenting external work in [met]
(optional)surface Area according to mosteller formula [m^2]
a numeric value presenting barometric pressure in [torr] or [mmHg]
a numeric value presenting exposure time in [minutes]
a numeric value presenting body height in [cm]
a numeric value presenting body weight in [kg]
a numeric value presenting turbulence intensity in [%]
a character element, either "set" or "pmvadj"
a numeric value presenting the driving coefficient for regulatory sweating
a numeric value presenting the driving coefficient for vasodilation
a numeric value presenting the driving coefficient for vasoconstriction
a string value either "else" for normal output of SET or "skinWet" to report value of skin wettedness
a string representing body position, has to be 'sitting' or 'standing'. Default value is 'sitting'
The code for calc2Node is based on the code in BASIC and C++ presented
by Fountain and Huizenga (1995). The translation into R-language and comparison
with ASHRAE 55-2013 conducted by Marcel Schweiker.
All variables must have the same length 1. For the calculation of several
values use function calcComfInd. The value of obj defines
whether the function will use the version presented in ASHRAE 55-2013 for
adjustment of pmv (obj = "pmvadj"), or the original code by Gagge to calculate
set (obj = "set"). In the version presented in ASHRAE 55-2013, the lines of
code related to self-generated convection is deleted. Therefore, a difference
can only be seen at higher values of met.
ASHRAE Standard 55-2013. Thermal environmental conditions for human occupancy. American society of heating, Refrigerating and Air-Conditioning Engineering, Atlanta, USA, 2013.
Fountain & Huizenga (1995) A thermal sensation model for use by the engineering profession ASHRAE RP-781 Final report.
Gagge, Fobelets & Berglund (1986) A standard predictive index of human response to the thermal environment, ASHRAE transactions, 92 (2B), 709-731.
see also calcComfInd
## Calculation of a single set of values.
calc2Node(22, 25, .50, 50)
Run the code above in your browser using DataLab