simcop2387/home-metrics-sql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

create window for abg

Browse source
This commit is contained in:
Ryan Voots 2025-05-11 13:50:39 -04:00
parent dfd2238dfa
commit 96a36317bb
1 changed files with 64 additions and 51 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

115
sql/condition-glucose-grafana.sql
View file

@ -1,51 +1,64 @@
WITH range_ts AS (
SELECT DATE_TRUNC('minute', ts) as ts
FROM generate_series($__timeFrom(), $__timeTo(), '1 minute'::interval) AS ts
), coallated AS
(SELECT ts,
gi_prev.time as stime,
gi_next.time as etime,
gi_prev.value as svalue,
gi_next.value as evalue,
EXTRACT(EPOCH FROM ts-gi_prev.time)/EXTRACT(EPOCH FROM gi_next.time-gi_prev.time) * gi_prev.value +
EXTRACT(EPOCH FROM gi_next.time-ts)/EXTRACT(EPOCH FROM gi_next.time-gi_prev.time) * gi_next.value AS samp_value
FROM range_ts rts
LEFT JOIN LATERAL (
SELECT *
FROM "glucose-import"
WHERE "time" <= rts.ts
ORDER BY "time" DESC
LIMIT 1
) AS gi_prev ON true
LEFT JOIN LATERAL (
SELECT *
FROM "glucose-import"
WHERE "time" >= rts.ts
ORDER BY "time" ASC
LIMIT 1
) AS gi_next ON true
WHERE gi_prev.time IS NOT NULL and gi_next.time IS NOT NULL AND gi_next.time <> gi_prev.time
), collected AS (
SELECT ts as time,
ema(samp_value ::real, 0.33) over (order by ts asc) as smoothval,
samp_value as absvalue
FROM coallated), firstorder AS (
SELECT time, smoothval, absvalue,
smoothval - LAG (smoothval, 1) OVER (ORDER BY time ASC) as delta1st
FROM collected), secondorder AS (
SELECT
time,
smoothval,
absvalue,
delta1st,
delta1st - LAG(delta1st, 1) OVER (ORDER BY time ASC) as delta2nd
FROM firstorder)
SELECT *,
ema(delta1st, 0.25) OVER (ORDER BY time ASC) as smoothdelta1st,
ema(delta2nd, 0.25) OVER (ORDER BY time ASC) as smoothdelta2nd,
STDDEV(delta1st) OVER (
ORDER BY time
RANGE BETWEEN INTERVAL '6 hours' PRECEDING AND CURRENT ROW
) AS std_dev_delta1st
FROM secondorder;
WITH range_ts AS (
SELECT date_trunc('minute'::text, ts.ts) AS ts
FROM generate_series(( SELECT min("glucose-import"."time") AS min
FROM "glucose-import"), ( SELECT max("glucose-import"."time") AS max
FROM "glucose-import"), '00:01:00'::interval) ts(ts)
), coallated AS (
SELECT rts.ts,
gi_prev."time" AS stime,
gi_next."time" AS etime,
gi_prev.value AS svalue,
gi_next.value AS evalue,
(EXTRACT(epoch FROM rts.ts - gi_prev."time") / EXTRACT(epoch FROM gi_next."time" - gi_prev."time"))::double precision * gi_prev.value + (EXTRACT(epoch FROM gi_next."time" - rts.ts) / EXTRACT(epoch FROM gi_next."time" - gi_prev."time"))::double precision * gi_next.value AS samp_value
FROM range_ts rts
LEFT JOIN LATERAL ( SELECT "glucose-import".id,
"glucose-import".serialnum,
"glucose-import".devicetype,
"glucose-import".units,
"glucose-import".value,
"glucose-import"."time"
FROM "glucose-import"
WHERE "glucose-import"."time" <= rts.ts
ORDER BY "glucose-import"."time" DESC
LIMIT 1) gi_prev ON true
LEFT JOIN LATERAL ( SELECT "glucose-import".id,
"glucose-import".serialnum,
"glucose-import".devicetype,
"glucose-import".units,
"glucose-import".value,
"glucose-import"."time"
FROM "glucose-import"
WHERE "glucose-import"."time" >= rts.ts
ORDER BY "glucose-import"."time"
LIMIT 1) gi_next ON true
WHERE gi_prev."time" IS NOT NULL AND gi_next."time" IS NOT NULL AND gi_next."time" <> gi_prev."time"
), collected AS (
SELECT coallated.ts AS "time",
ema(coallated.samp_value::real, 0.33::real) OVER (ORDER BY coallated.ts) AS smoothval,
coallated.samp_value AS absvalue
FROM coallated
), firstorder AS (
SELECT collected."time",
collected.smoothval,
collected.absvalue,
collected.smoothval - lag(collected.smoothval, 1) OVER (ORDER BY collected."time") AS delta1st
FROM collected
), secondorder AS (
SELECT firstorder."time",
firstorder.smoothval,
firstorder.absvalue,
firstorder.delta1st,
firstorder.delta1st - lag(firstorder.delta1st, 1) OVER (ORDER BY firstorder."time") AS delta2nd
FROM firstorder
)
SELECT "time",
smoothval,
absvalue,
delta1st,
delta2nd,
ema(delta1st, 0.25::real) OVER (ORDER BY "time") AS smoothdelta1st,
ema(delta2nd, 0.25::real) OVER (ORDER BY "time") AS smoothdelta2nd,
stddev(delta1st) OVER (ORDER BY "time" RANGE BETWEEN '02:00:00'::interval PRECEDING AND CURRENT ROW) AS std_dev_delta1st,
avg(absvalue) OVER (ORDER BY "time" RANGE BETWEEN '3 mons'::interval PRECEDING AND CURRENT ROW) AS "3mo_eabg",
avg(absvalue) OVER (ORDER BY "time" RANGE BETWEEN '7 days'::interval PRECEDING AND CURRENT ROW) AS week_eabg
FROM secondorder;