Clojure中的滚动平均值序列

本文介绍了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.