程序员经验分享-hwhale

LISP - 如何获得嵌套列表的平均长度？

2024-02-20

我有个问题。我需要从此列表中获取平均长度：(1 (2 3 4) 5 (6 7) 8 (9))。应该是2。我不知道从哪里开始......

我试图得到(1 2 3 4 5 6 7 8 9) from (1 (2 3 4) 5 (6 7) 8 (9))但我失败了，因为(reduce #'append list-name)不工作。

我知道如何计算这个，但我需要获取 (1 (2 3 4) 5 (6 7) 8 (9)) 内的所有列表 像这样：

list1 = (1 5 8)
list2 = (2 3 4)
list3 = (6 7)
list4 = (9)

但我不知道怎么办。

你能给我一些帮助吗？


(defun nested-lists-average-length (ls &aux (i 0) (n 0))
    (dolist (a ls (float (/ _______)))
      (if (_______ a) 
        (progn (_______ i) 
               (incf n (_______ a) )))))

Fill http://clhs.lisp.se/Body/m_dolist.htm ... in http://clhs.lisp.se/Body/f_listp.htm ... the http://clhs.lisp.se/Body/m_incf_.htm ... blanks http://www.lispworks.com/documentation/HyperSpec/Body/f_length.htm. :)

本文内容由网友自发贡献，版权归原作者所有，本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容，请联系:hwhale#tublm.com(使用前将#替换为@)

list

nested

lisp

Average

clisp

LISP - 如何获得嵌套列表的平均长度？ 的相关文章

  • Python - 在和不在列表中语法错误

    我正在尝试从另一个现有的浮点数列表构建一个新的浮点数列表 通过示例更容易识别第一个列表的预期内容 price list 39 99 74 99 24 99 49 99 预期的后期功能 print new price list gt gt 2

  • R 数据框到嵌套列表

    我想将这种格式的数据帧 tbl 转换为以下嵌套列表 tbllst library tidyr tbl lt tribble Col1 Col2 Col3 Var1 Var1 1 Var1 1 1 Var1 Var1 1 Var1 1 2 V

  • 根据多个值过滤字典列表

    我有一个字典列表 我想根据多个条件进行过滤 该列表的简化版本如下所示 orders name v price 123 location Mars name x price 223 location Mars name x price 124

  • for 循环中列表项未更改

    当以下代码没有达到我预期的效果时 我感到震惊 lines list this is line 1 n this is line 2 n this is line 3 n for line in lines list line line st

  • 列表列中的设置操作

    我正在尝试做集合运算在存储在列表列中的向量之间 例如this https stackoverflow com questions 38712196 text file to dataframe with a list column DT l

  • Python - 如何将列表保存为图像？

    我生成一个常规列表 是否可以将此列表保存为 JPEG 图像或 PNG 或其他格式 以便我可以打开图像并查看它 我目前正在尝试使用 python 成像库 PIL 来解决这个问题 这是可能的解决方案之一 使用以下方法创建一个空图像对象 Imag

  • 在 Python 中使用 .split() 和 .join()

    我目前正在 Treehouse 中学习一些 Python 但我遇到了这个挑战 并且不知道我做错了什么 挑战分为三个部分 如下所示 包含提示和我编写的代码 我好像在第三部分犯了错误 Part 1 我想是时候吃点零食了 幸运的是 我有一串各种各

  • 如何将 Pandas Dataframe 中的字符串转换为字符列表或数组？

    我有一个名为的数据框data 其中一列包含字符串 我想从字符串中提取字符 因为我的目标是对它们进行一次性编码并使之可用于分类 包含字符串的列存储在预测因子如下 predictors pd DataFrame data columns Seq

  • 通过 id 从通用列表中删除对象

    我有一个像这样的域类 public class DomainClass public virtual string name get set public virtual IList

  • Python选择列表中最长字符串的最有效方法？

    我有一个可变长度的列表 并且正在尝试找到一种方法来测试当前正在评估的列表项是否是列表中包含的最长字符串 我正在使用Python 2 6 1 例如 mylist abc abcdef abcd for each in mylist if co

  • 嵌套控件结构 - 使用 XAML 还是 C#？

    我想创建一个由相当多的元素组成的结构 它的基本布局如下

  • 根据 Mathematica 中的另一个列表值拆分列表

    在 Mathematica 中我有一个点坐标列表 size 50 points Table RandomInteger 0 size RandomInteger 0 size i 1 n 以及这些点所属的聚类索引列表 clusterIndi

  • 使用 sapply 的列表和矩阵

    我有一个也许是基本的问题 我在网上搜索过 我在读取文件时遇到问题 尽管如此 我还是按照 Konrad的建议设法读取了我的文件 我很欣赏这一点 How to get R to read in files from multiple subdi

  • AngularJS 中的嵌套模块

    我有 2 个不同的 AngularJs 模块 一个 widgetContainer 和一个 widget 小部件可以显示为独立的应用程序 也可以包含在小部件容器中 一个 widgetContainer 包含 0 N 个 widget 如果我

  • 以特定方式填充列表

    我需要填充一个包含 5 个位置的列表 new list 我收到 2 个列表 并且有一个默认值来填充新列表 现在开始解决问题 好的方式是 我从列表中接收 2 个值 从列表中接收 2 个值并添加默认值 A1 A2 DEFAULT B1 B2 但

  • Python：两个列表之间的成对比较：列表 a >= 列表 b？

    如果我想检查列表中的所有元素 a 1 2 3 6 大于或等于另一个列表中对应的元素 b 0 2 3 5 如果 a i gt b i 对于所有i的 则返回 true 否则返回 false 这有逻辑功能吗 比如a gt b 谢谢 你可以这样做

  • 如何在 Python 中连接两个列表？

    这个问题的答案是社区努力 help privileges edit community wiki 编辑现有答案以改进这篇文章 目前不接受新的答案或互动 如何在 Python 中连接两个列表 Example listone 1 2 3 lis

  • Django查询：如何过滤对象以排除列表中的id？

    如何在查询中进行过滤 以便结果排除 ID 属于列表的任何对象实例 可以说我有 object id list 1 5 345 MyObject objects filter Q time gte datetime now Q what to

  • 学习 Lisp 的资源 [关闭]

    就目前情况而言 这个问题不太适合我们的问答形式 我们希望答案得到事实 参考资料或专业知识的支持 但这个问题可能会引发辩论 争论 民意调查或扩展讨论 如果您觉得这个问题可以改进并可能重新开放 访问帮助中心 help reopen questi

  • 学习 LISP 的最佳方法是什么？ [关闭]

    就目前情况而言 这个问题不太适合我们的问答形式 我们希望答案得到事实 参考资料或专业知识的支持 但这个问题可能会引发辩论 争论 民意调查或扩展讨论 如果您觉得这个问题可以改进并可能重新开放 访问帮助中心 help reopen questi

随机推荐

  • 在 html 中显示列表和子列表

    如何组织 html 代码 使用 ol li 等 来呈现此类列表 带有子列表 1 BLA BLA BLA 1 1 Bla bla bla 1 2 Bla bla bla 1 3 Bla bla bla lalal balalala lalal

  • CKEditor对话框选择框动态填充

    我在对话框中有两个选择框 我想知道是否可以根据第一个框的选择设置第二个选择框的内容 即 如果选择框 1 选择了 x 则选择框 2 的内容为 a b c 如果 select box1 选择了 y 则 select box2 内容为 d e f

  • Pandoc：转换为 HTML 时没有换行

    我正在从 Markdown 转换为 HTML 如下所示 pandoc columns 70 mathjax f markdown input pdc t html Ss gt out html 除了文本没有换行之外 一切正常 我尝试了不同的

  • Docker Hub 和 git 子模块

    我有一个使用 git 子模块的存储库 并且我在 Docker Hub 上配置了自动构建 在构建过程开始时 Docker Hub 似乎从默认分支 master 中提取存储库 更新子模块 然后签出到触发构建的特定分支 假设分支 feature

  • 如何在 R 中向数据集添加标题？

    我需要读取以下数据文件夹中的 wdbc data http archive ics uci edu ml machine learning databases breast cancer wisconsin http archive ics

  • Delphi XE2 / Indy TIdTCPServer /“连接由对等方重置”

    我在 Delphi XE2 中使用 Indy 使用 TIdTCPServer 发送 TCP 消息时遇到一个问题 举个例子 我有 2 台设备 我将与设备 1 进行通信 当我向设备 1 发送消息时 消息发送正常 但在不关闭程序的情况下 当我向设

  • SQlite：如何找到互斥对？

    这里有张桌子Likes有字段ID1 ID2其中包含互斥对 例如 1689 1709 and 1709 1689 我想找到他们 我尝试了串联 但没有成功 select L ID1 L ID2 from Likes L where L ID1

  • Windows 10 可以从应用商店下载 Windows 8.0 应用程序吗？

    我的 Windows 开发中心仪表板中有 Windows 8 0 软件包 我想知道 Windows 10 用户是否可以通过某种方式从 Windows 应用商店查看并下载我的应用程序 看来它不起作用 怎么做 我是否必须将我的项目 重新定位 到

  • UIWebView动态内容大小

    我环顾四周 没有看到任何快速相关的方法来做到这一点 我试图让我的 UIWebViews 高度是动态的 我有一个使用 loadHtmlString 函数加载数据的 UIWebView 问题是我从 sqlite 数据库加载数据 每次加载不同长度

  • JSF 2 复合：actionSource 在 ui 中公开命令按钮：repeat

    在我的复合组件中 我有一个 ui repeat 其中除其他静态内容外 还有一个命令按钮 如下所示

  • 全文搜索引擎比较——Lucene、Sphinx、Postgresql、MySQL？ [关闭]

    Closed 这个问题正在寻求书籍 工具 软件库等的推荐 不满足堆栈溢出指南 help closed questions 目前不接受答案 我正在构建一个 Django 网站 并且正在寻找一个搜索引擎 几位候选人 Lucene Lucene

  • 如何删除 SQLite 中的所有空表？

    我想删除所有没有行的表 如何删除 SQLite 中的所有空表 EDIT我需要在手机上执行此操作 没有外壳 在 Windows Mobile 手机上 执行命令时 无论表中是否有数据 都可以删除表 不知道任何数据库以其他方式运行 所以这意味着

  • 如何修复 pip 安装错误：“环境错误：[Errno 42] 非法字节序列”？

    我正在尝试下载kivy模块使用pip 当我运行pip install command 我得到一个错误 Could not install packages due to an EnvironmentError Errno 42 Illega

  • 我获取的资源不在项目的构建路径上[重复]

    这个问题在这里已经有答案了 当我尝试 组织导入 或尝试访问任何类属性时 我得到了资源不在项目的构建路径上 我正在使用 ant 构建我的项目 我尝试在 javabuilpath gt 项目中配置我的构建路径 但它没有向我显示我的 src 文件

  • 如何跳转到 RichTextBox 中的特定行？

    我正在寻找如何跳转到特定行的示例代码RichTextBox in WPF 我不知道如何做到这一点 在 winForms 中它非常简单 因为我可以自由设置 SelectionStart 和 Selection Length 这与 WPF 中不

  • 当[:punct:]太多时[重复]

    这个问题在这里已经有答案了 我正在清理 R 中的文本字符串 我想删除所有标点符号except撇号和连字符 这意味着我无法使用 punct 字符类 除非有一种说法 punct but not lt gt 并且反引号必须出来 对于上述大多数情况

  • 在 Visual Studio 2010 C/C++ 中，“重新扫描解决方案”操作有何作用？

    我正在尝试编译第三方项目 但遇到一些链接问题 我在解决小问题时没有遇到太大麻烦 但我注意到它们是项目或解决方案的上下文菜单中的 重新扫描解决方案 选项 我点击了它 但它似乎没有做任何事情 它到底有什么作用 此命令更新项目浏览数据库中的过时文

  • 如何使用 sed 只删除三个空行？

    如何使用 sed 只删除三个空行 例如 我的文本 txt line1 line2 line3 line4 使用 sed 我希望结果看起来像这样 我的文本 txt line1 line2 line3 line4 我能够删除双空行 sed i

  • Azure SignalR 服务连接未处于活动状态

    我从 2 4 0 更新了我们的信号包并添加了RunAzureSignalR代替RunSignalR 在 de 中添加了此代码Startup cs app Map signalr map gt var hubConfiguration new

  • LISP - 如何获得嵌套列表的平均长度？

    我有个问题 我需要从此列表中获取平均长度 1 2 3 4 5 6 7 8 9 应该是2 我不知道从哪里开始 我试图得到 1 2 3 4 5 6 7 8 9 from 1 2 3 4 5 6 7 8 9 但我失败了 因为 reduce app

热门标签