Сообщение от Hogfather
> # задаем показания счетчиков горячего водоснабжения и находим расход
> hvs<-c(108,112,117,122,132,138,144,150,153,159,163,170, 175,180,185,189,194,199,204,209)
> hv<-diff(hvs)
> # задаем показания счетчиков холодного водоснабжения и находим расход
> gvs<-c(264,279,295,307,322,333,349,360,366,381,390,404, 414,423,431,437,444,450,456,463)
> gv<-diff(gvs)
|