在Clojure序列中修剪周期的不引人注目的方法

作者：平凡数码广场 | 来源：互联网 | 2022-12-08 12:10

如何解决《在Clojure序列中修剪周期的不引人注目的方法》经验，为你挑选了1个好方法。

我正在尝试编写一个lazy seq来为给定的输入int 生成Collatz序列.

我喜欢这个函数,因为它是如此干净地映射到数学定义:

(defn collatz
  "Returns a lazy seq of the Collatz sequence starting at n and ending at 1 (if
  ever)."
  [n]
  (letfn [(next-term [x]
            (if (even? x)
              (/ x 2)
              (inc (* 3 x))))]
    (iterate next-term n)))



问题在于,由于Collatz序列的行为方式,这会产生无限的seq:

(take 10 (collatz 5))
  => (5 16 8 4 2 1 4 2 1 4)


我可以通过添加来轻松地删除循环(take-while #(not= 1 %) ...),但是1 是序列的一部分.我认为所有其他的方法都会在一个丑陋之后修剪周期,并使Collatz序列的数学核心模糊不清.

(我已经考虑将看到的值存储在一个原子中并在take-while谓词中使用它,或者只是在一个原子中存储一个标志以达到类似的效果.但我觉得有一些更好,更漂亮,更少侵入性的方式来做我所做的事情.想要在这里.)

所以我的问题是:在无限序列中检测和修剪周期的干净方法是什么？或者,我可以以某种方式(可能使用for)生成我的懒惰seq,当它达到1(包括)时自动修剪？


1> Aleph Aleph..：
下面看起来像或多或少直译的定义,并给出你想要的结果:

(defn collatz-iter [x]
  (cond (= x 1) nil
        (even? x) (/ x 2)
        :else (inc (* 3 x))))

(defn collatz [n]
  (take-while some? (iterate collatz-iter n)))

(collatz 12) ;; => (12 6 3 10 5 16 8 4 2 1)


基本上,您可以使用nil值来停止序列,从而保持最终1.




    
        
                        int
                    
    



    
        写下你的评论吧 !
        
            
                吐个槽吧,看都看了
            
            
                
                                        会员登录 | 用户注册
                                    
                
            
        

        
    

    
        推荐阅读
        
            
                                
                    
                        string
                        如何自行分析定位SAP BSP错误
                    

                    
                                                
                            
                        
                                                
                        The“BSPtag”Imentionedintheblogtitlemeansforexamplethetagchtmlb:configCelleratorbelowwhichi ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 19:58:05
                    

                

                
                                
                    
                        string
                        Java太阳系小游戏分析和源码详解
                    

                    
                                                
                            
                        
                                                
                        本文介绍了一个基于Java的太阳系小游戏的分析和源码详解。通过对面向对象的知识的学习和实践，作者实现了太阳系各行星绕太阳转的效果。文章详细介绍了游戏的设计思路和源码结构，包括工具类、常量、图片加载、面板等。通过这个小游戏的制作，读者可以巩固和应用所学的知识，如类的继承、方法的重载与重写、多态和封装等。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 19:53:34
                    

                

                                
                    
                    
                
                
                                
                    
                        instance
                        GetWindowLong函数
                    

                    
                                                
                            
                        
                                                
                        今天在看一个代码里头写了GetWindowLong(hwnd,0)，我当时就有点费解，靠，上网搜索函数原型说明，死活找不到第 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:58:15
                    

                

                
                                
                    
                        config
                        Linux服务器密码过期策略、登录次数限制、私钥登录等配置方法
                    

                    
                                                
                            
                        
                                                
                        本文介绍了在Linux服务器上进行密码过期策略、登录次数限制、私钥登录等配置的方法。通过修改配置文件中的参数，可以设置密码的有效期、最小间隔时间、最小长度，并在密码过期前进行提示。同时还介绍了如何进行公钥登录和修改默认账户用户名的操作。详细步骤和注意事项可参考本文内容。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:57:01
                    

                

                
                                
                    
                        config
                        【机器学习】生成式对抗网络模型综述
                    

                    
                                                
                        生成式对抗网络模型综述摘要生成式对抗网络模型(GAN)是基于深度学习的一种强大的生成模型，可以应用于计算机视觉、自然语言处理、半监督学习等重要领域。生成式对抗网络 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:51:18
                    

                

                
                                
                    
                        config
                        gcdexgcd斐蜀定理的求解方法及应用
                    

                    
                                                
                        本文介绍了求解gcdexgcd斐蜀定理的迭代法和递归法，并解释了exgcd的概念和应用。exgcd是指对于不完全为0的非负整数a和b，gcd(a,b)表示a和b的最大公约数，必然存在整数对x和y，使得gcd(a,b)=ax+by。此外，本文还给出了相应的代码示例。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:48:30
                    

                

                
                                
                    
                        python
                        Python3中选择文件对话框的格式打开和保存图片
                    

                    
                                                
                        本文介绍了在Python3中如何使用选择文件对话框的格式打开和保存图片的方法。通过使用tkinter库中的filedialog模块的asksaveasfilename和askopenfilename函数，可以方便地选择要打开或保存的图片文件，并进行相关操作。具体的代码示例和操作步骤也被提供。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:46:55
                    

                

                
                                
                    
                        post
                        在类中定义数组时出错 - Error on defining arrays in class
                    

                    
                                                
                        Iamtryingtomakeaclassthatwillreadatextfileofnamesintoanarray,thenreturnthatarra ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:38:12
                    

                

                
                                
                    
                        string
                        Android开发笔记：使用Picasso加载网络图片等比例缩放
                    

                    
                                                
                        在Android开发中，使用Picasso库可以实现对网络图片的等比例缩放。本文介绍了使用Picasso库进行图片缩放的方法，并提供了具体的代码实现。通过获取图片的宽高，计算目标宽度和高度，并创建新图实现等比例缩放。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:34:00
                    

                

                
                                
                    
                        schema
                        kotlin动画实现上下移动、放大缩小、旋转功能
                    

                    
                                                
                        本文介绍了使用kotlin实现动画效果的方法，包括上下移动、放大缩小、旋转等功能。通过代码示例演示了如何使用ObjectAnimator和AnimatorSet来实现动画效果，并提供了实现抖动效果的代码。同时还介绍了如何使用translationY和translationX来实现上下和左右移动的效果。最后还提供了一个anim_small.xml文件的代码示例，可以用来实现放大缩小的效果。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:29:08
                    

                

                
                                
                    
                        schema
                        JetBrain有哪些产品可以用来编写C++和C代码？
                    

                    
                                                
                            
                        
                                                
                        本文介绍了JetBrain的哪些产品可以用来编写C++和C代码，帮助读者选择适合自己的开发工具。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:23:24
                    

                

                
                                
                    
                        config
                        VScode格式化文档换行或不换行的设置方法
                    

                    
                                                
                            
                        
                                                
                        本文介绍了在VScode中设置格式化文档换行或不换行的方法，包括使用插件和修改settings.json文件的内容。详细步骤为：找到settings.json文件，将其中的代码替换为指定的代码。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:15:38
                    

                

                
                                
                    
                        config
                        Android 新闻App的本地服务器搭建教程
                    

                    
                                                
                        本文介绍了在开发Android新闻App时，搭建本地服务器的步骤。通过使用XAMPP软件，可以一键式搭建起开发环境，包括Apache、MySQL、PHP、PERL。在本地服务器上新建数据库和表，并设置相应的属性。最后，给出了创建new表的SQL语句。这个教程适合初学者参考。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 17:15:19
                    

                

                
                                
                    
                        less
                        brain是什么意思_brain怎么读_brain翻译_用法_发音_词组_同反义词_脑新东方在线英语词典
                    

                    
                                                
                        本文介绍了brain的意思、读音、翻译、用法、发音、词组、同反义词等内容，以及脑新东方在线英语词典的相关信息。还包括了brain的词汇搭配、形容词和名词的用法，以及与brain相关的短语和词组。此外，还介绍了与brain相关的医学术语和智囊团等相关内容。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 16:52:33
                    

                

                
                                
                    
                        less
                        云原生边缘计算之KubeEdge简介及功能特点
                    

                    
                                                
                            
                        
                                                
                        本文介绍了云原生边缘计算中的KubeEdge系统，该系统是一个开源系统，用于将容器化应用程序编排功能扩展到Edge的主机。它基于Kubernetes构建，并为网络应用程序提供基础架构支持。同时，KubeEdge具有离线模式、基于Kubernetes的节点、群集、应用程序和设备管理、资源优化等特点。此外，KubeEdge还支持跨平台工作，在私有、公共和混合云中都可以运行。同时，KubeEdge还提供数据管理和数据分析管道引擎的支持。最后，本文还介绍了KubeEdge系统生成证书的方法。 ...
                        [详细]
                    
                    

                    
                        蜡笔小新   2023-12-14 16:49:01

















    

    
        
            
            
                
                
            

            
                平凡数码广场            

            
                这个家伙很懒，什么也没留下！            


        
    

    
    

    
    

    
        Tags | 热门标签
        
            
                                
                    erlang
                
                                
                    keyword
                
                                
                    match
                
                                
                    javascript
                
                                
                    stream
                
                                
                    settings
                
                                
                    include
                
                                
                    express
                
                                
                    数组
                
                                
                    eval
                
                                
                    instance
                
                                
                    config
                
                                
                    datetime
                
                                
                    buffer
                
                                
                    loops
                
                                
                    uri
                
                                
                    python
                
                                
                    less
                
                                
                    python3
                
                                
                    range
                
                                
                    jar
                
                                
                    schema
                
                                
                    const
                
                                
                    uml
                
                                
                    install
                
                                
                    node.js
                
                                
                    string
                
                                
                    post
                
                                
                    command
                
                                
                    dll
                
                                
            
        
    

    
    
        
            
            
        
        RankList | 热门文章
        
            
                                
                    1SpringCloudSleuth分布式链路跟踪
                
                                
                    2动手学深度学习 | 序列到序列学习（seq2seq）| 62
                
                                
                    3日期时间。C#中的 AddSeconds()方法
                
                                
                    4数据库基础Database1初级SQL
                
                                
                    5某系统提供了用户信息操作模块，用户可以修改自己的各项信息。为了使操作过程更加人性化，现使用备忘录模式对系统进行改进，使得用户在进行了错误操作之后可以恢复到操作之前的状态。用户信息中包含账号、密码、电话
                
                                
                    6个人茶作品展型号
                
                                
                    7Carbon vs. Aqua vs. Cocoa Emacs构建 - Carbon vs. Aqua vs. Cocoa Emacs builds
                
                                
                    8CDH中flume是已经启动着了…
                
                                
                    9Windows编程 第十回 鼠标的秘密
                
                                
                    10LOJ#2353 货币兑换
                
                                
                    11苹果软件库乐队有什么用
                
                                
                    12linux 网段扫描
                
                                
                    13vscode js 有用的代码片断
                
                                
                    14nbiot技术能自组网么，由什么组成的
                
                                
                    15highcharts更改整个图表字体颜色为白色不生效？