Clojure中的滚动平均值序列 [英] sequence of a rolling average in Clojure

问题描述

我正在寻找一种优雅的方式来生成一系列数字序列的滚动平均值。希望比使用lazy-seq更优雅一些

I'm looking for an elegant way to generate a sequence of the rolling average of a sequence of numbers. Hopefully something more elegant than using lazy-seq

推荐答案

没有考虑效率：

(defn average [lst] (/ (reduce + lst) (count lst)))

(defn moving-average [window lst] (map average (partition window 1 lst)))


user> (moving-average 5 '(1 2 3 4 5 6 7 8))
(3 4 5 6)

b $ b

如果你需要它快，有一些相当明显的改进！
但它会变得不那么优雅。

If you need it to be fast, there are some fairly obvious improvements to be made! But it will get less elegant.

这篇关于Clojure中的滚动平均值序列的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！