作者:liqiqinai | 来源:互联网 | 2023-02-06 06:15
我想创建一个函数,当你输入一个数字说5它将返回一个从1到5的所有数字的向量,即[1 2 3 4 5]
到目前为止,我在
(defn counter [number]
(let [x 1
result []]
(when (<= x number)
(conj result x)
(inc x))))
现在它将1放入向量中,但我想现在说(inc x)
并再次运行.我必须使用复发吗?
任何帮助深表感谢
1> Alex Miller..:
来自@ fl00r的答案很好,但我还想提出一个可以减少的答案:
(defn get-range [n] ;; range/into
(into [] (range 1 n)))
Reducibles更适合这种用例,因为
range
在Clojure 1.7中重建为可自我还原,对于长启动/步长/结束值的特殊情况,它将在自我缩减期间使用原始长度.
使用转换器形式意味着可以直接构建最终矢量,而不是构建惰性序列然后将其放入矢量中
into
在构建矢量时会自动使用瞬变 - 对于非常小的范围,开销很小(与环路方法相比),但是在较大范围内可以节省很多
因为你正在构建一个具体的集合(向量),所以没有懒惰的好处,所以一种渴望的方法更有意义
这种方法比任何序列方法都有更多的时间和内存效率.range
作为可简化的将不会消耗堆空间(只有少数本地人).通过填充数组然后根据需要直接构建持久向量节点来构建瞬态向量.相比之下,所有序列方法都将在迭代器上进行盒装数学运算,构建多个嵌套的缓存序列值,然后将这些值逐个复制到向量中.上面使用的循环方法将使用原始数学并获得一些性能优势(但仍然具有向量与瞬态逐个添加元素的缺点).
快速性能测试(适用于各种尺寸的矢量):
Size | range/vec | iterate/vec | loop/recur | loop/recur' | range/into |
-----|---------------|---------------|---------------|---------------|---------------|
1 | 160.968880 ns | 180.287974 ns | 40.373079 ns | 79.203722 ns | 136.157046 ns |
10 | 378.058753 ns | 851.381372 ns | 342.720391 ns | 200.658997 ns | 253.015756 ns |
100 | 2.486726 µs | 8.034826 µs | 3.464423 µs | 1.471333 µs | 1.760118 µs |
1000 | 23.349414 µs | 88.188242 µs | 37.247193 µs | 16.443044 µs | 17.109882 µs |
Perf测试是使用Java 1.8/Clojure 1.8上的Criterium快速工作台完成的
测试版本:
range/vec - 来自@ fl00r的第一个例子 - 原始数学,1个序列,瞬态
iterate/vec - 来自@ fl00r的第二个例子 - 盒装数学,2个序列,瞬态
loop/recur - 来自@ fl00r的第3个例子 - 原始数学,0个序列,没有瞬态
loop/recur' - 与先前相同,但修改为使用瞬态 - 原始数学,0序列,瞬态
range/into - 这个答案顶部的例子 - 原始数学,0序列,瞬态
请注意,最后两个具有相似的特征,但loop/recur'使用了更多代码:
(defn get-range [n] ;; loop/recur'
(loop [m 1
res (transient [])]
(if (> m n)
(persistent! res)
(recur (inc m) (conj! res m)))))