8.8.1 Первый пример: вычисление расхода бензина

Предположим, что мы ведем книгу учета расхода бензина. При каждой заправке в нее записывается дата, пробег в километрах и объем заправки в литрах:

Дата

Пробег

Литров

16.12.1992

20580

60,3

23.12.1992

21250

57,4

04.01.1993

21874

56,6

17.01.1993

22476

56,3

28.01.1993

22954

45,4

12.02.1993

23450

48,6

27.02.1993

24020

57,0

14.03.1993

24611

56,7

Эти данные записаны соответственно в переменных tag, monat, jaehr, kmstand и liter файла tank.sav. Для каждой даты (кроме первой, где это невозможно) требуется вычислить пробег за день и средний расход бензина в расчете на сто километров, а также вывести их через новые переменные.

Это типичный случай, где рационально применить функций LAG и YRMODA. Используя пояснения к этим функциям, которые содержатся в разделе 8.1.2, попробуйте самостоятельно интерпретировать смысл следующих команд:

 COMPUTE   ntage=yrmoda(jahr,monat,tag)     . 
  COMPUTE difftage=ntage-lag(ntage,1) 
  COMPUTE diffkm=kmstand-lag(kmstand/1). 
  COMPUTE  verbr=liter*100/diffkm   . 
  COMPUTE     kmtag=diffkm/difftage     . 
  EXECUTE    . 
Сайт управляется системой uCoz