Description Usage Format Note References Examples

Calibration data for predicted heat strain model from ISO 7933 Appendix F

1 |

A data frame with 10 rows on the following 11 variables and 5 predicted result values.

`accl`

a numeric vector

`posture`

a numeric vector of posture, 1 = sitting, 2 = standing, 3 = crouching []

`Ta`

a numeric vector o air temperature [degree C]

`Pa`

a numeric vector of partial water vapour pressure [kPa]

`Tr`

a numeric vector of mean radiant temperature [degree C]

`Va`

a numeric vector of air velocity [m/s]

`Met`

a numeric vector of metabolic rate [W/(m*m)]

`Icl`

a numeric vector of static thermal insulation [clo]

`THETA`

a numeric vector of angle between walking direction and wind direction, 0-360 [degree]

`Walksp`

a numeric vector of walking speed [m/s]

`Duration`

a numeric vector of the duration of the work sequence, usually 480 [min]

`Tre`

a numeric vector of predicted rectal temperature [degree C]

`SWtotg`

a numeric vector of predicted total water loss [g]

`Dlimtre`

a numeric vector of predicted time after which maximum rectal temperatur is reached [min]

`Dlimloss50`

a numeric vector of maximum duration to limit water loss to 7.5% of body mass with an average person [min]

`Dlimloss95`

a numeric vector of maximum duration to limit water loss to 5.0% of body mass with 95% of population [min]

Additionally to the 5 presented predicted values in ISO 7933 some more intermediate results are exported to the dataframe.

ISO 7933 Ergonomics of the thermal environment - Analytical determination and interpretation of heat stress using calculation of the predicted heat strain (ISO 7933:2004)

1 2 3 4 5 6 7 | ```
data(dfISO7933AppF)
head(dfISO7933AppF)
dfHs <- sapply(seq(nrow(dfISO7933AppF)), function(x) { calcIso7933(dfISO7933AppF$accl[x],
dfISO7933AppF$posture[x], dfISO7933AppF$Ta[x], dfISO7933AppF$Pa[x], dfISO7933AppF$Tr[x],
dfISO7933AppF$Va[x], dfISO7933AppF$Met[x], dfISO7933AppF$Icl[x], dfISO7933AppF$THETA[x],
dfISO7933AppF$Walksp[x], dfISO7933AppF$Duration[x]) } )
``` |

marcelschweiker/comf documentation built on Jan. 9, 2019, 10:10 p.m.

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.