# NOT RUN {
## Calc single value of MRT in room with only right angles
length <- 6 # in m
width <- 4
height <- 3
position <- c(2,3,0.6)
Temperatures <- c(21,21,21,21,30,21) # uniform room with ceiling heating
calcSimpleMRT(length,width,height,position,Temperatures)
# }
Run the code above in your browser using DataLab