Методы
plot-circular-outlined
(t03 t2 u-tm (t-fild <t-fild>) &key (func-aver-or-max (function average-not-nil-value)) (scale *scale-smoothing*) (d-pts (d-pts-scale t-fild scale scale)) (intervals 100) (hights (list 1 0 intervals)) (ocr (ocr-intervals t-fild intervals intervals)) (hw-coeff *hw-coeff*) (h-ol-max (h-ol-max-hw-coeff t-fild hw-coeff hw-coeff)) (h-ol-min (h-ol-min-hw-coeff t-fild hw-coeff hw-coeff)) (w-ol-max (w-ol-max-hw-coeff t-fild hw-coeff hw-coeff)) (w-ol-min (w-ol-min-hw-coeff t-fild hw-coeff hw-coeff)))
Описание: plot-circular-outlined выводит в каталог ~/gnuplot файлы для построения окружной эпюры поля температур.
Пример использования:
(plot-circular-outlined
'(10.2 10.5 10.0 10.0 10.2
10.0 11.9 14.8 13.0 11.0
10.4 -11.8 14.9 13.9 11.8
10.0 11.5 14.0 13.6 11.0
10.1 11.5 14.0 13.0 11.6)
5.0
(get-universal-time)
mtf/db:*DN80*)
(plot-circular-outlined
'(10.2 10.5 10.0 10.0 10.2
10.0 11.9 14.8 13.0 11.0
10.4 -11.8 14.9 13.9 11.8
10.0 11.5 14.0 13.6 11.0
10.1 11.5 14.0 13.0 11.6)
5.0
(get-universal-time) mtf/db:*DN80* :func-aver-or-max #'math/stat:max-not-nil-value)
plot-radial-outlined
(t03 t2 u-tm (t-fild <t-fild>) &key (func-aver-or-max (function average-not-nil-value)) (scale *scale-smoothing*) (d-pts (d-pts-scale t-fild scale scale)) (intervals 100) (hights (list 1 0 intervals)) (ocr (ocr-intervals t-fild intervals intervals)) (hw-coeff *hw-coeff*) (h-ol-max (h-ol-max-hw-coeff t-fild hw-coeff hw-coeff)) (h-ol-min (h-ol-min-hw-coeff t-fild hw-coeff hw-coeff)) (w-ol-max (w-ol-max-hw-coeff t-fild hw-coeff hw-coeff)) (w-ol-min (w-ol-min-hw-coeff t-fild hw-coeff hw-coeff)) (terminal *terminal-plot-radial-outlined*) (preamble *preamble-plot-radial-outlined*))
Описание: plot-radial-outlined
Пример использования:
(progn
(plot-radial-outlined (t03-2d->signals *t03*) *t02* *ut* *dn80*)
(plot-radial-outlined (t03-2d->signals *t03*) *t02* *ut* *dn80* :func-aver-or-max #'math/stat:max-not-nil-value))