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 .
Загрузите файл tank.sav.
Введите приведенные выше команды в редактор синтаксиса или примените для этого диалоговое окно Compute Variable.
В заключение командами меню Analyze (Анализ) Reports (Отчеты) Case summaries... (Сводка наблюдений) выведите значения переменных tag, monat, jahr, kmtag и verbr.