Commit 9e2cf750 authored by Sigbjørn Revheim's avatar Sigbjørn Revheim
Browse files

Fixes missing output of egen pctile p option.

parent 84dd40f8
......@@ -99,7 +99,7 @@
:rowpctile (make-compute
varname
"rowpctile"
(let [p (:p options {:Values [50]})]
(let [p (:p options '({:Values (50)}))]
[(make-varlist-expression varlist)
(numeric-constant-expression (-> p first :Values first))]
)
......@@ -199,7 +199,7 @@
varname
(get aggregate-funcs (keyword funcname))
[expr
(numeric-constant-expression (-> (:p options {:Values [50]}) :Values first))]
(numeric-constant-expression (-> (:p options '({:Values [50]})) first :Values first))]
_filter)
:pc (make-aggregate
by-clause
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment