设置列表格式

2023-12-25

我有以下清单:(X X O NIL NIL O NIL NIL O)

我想将其格式化为如下所示:

X | X | O
--+---+--
  |   | O
--+---+--
  |   | O

我也许可以用我对 Lisp 所知甚少的东西拼凑出一些东西FORMAT,但这可能会非常糟糕。任何指示将不胜感激。


* (format t "~{~A | ~A | ~A~%~^--+---+--~%~}"
    (mapcar (lambda (x) (or x " ")) '(X O X NIL X X O X NIL)))
X | O | X
--+---+--
  | X | X
--+---+--
O | X |
NIL
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

设置列表格式 的相关文章

  • windows下无法用emacs + sbcl启动slime

    我想配置我的 emacs 以使用 SLIME 和 SBCL emacs 文件如下所示 add to list load path D app slime setq inferior lisp program sbcl require sli
  • Scheme/Lisp 嵌套循环和递归

    我正在尝试解决方案中的一个问题 该问题要求我使用嵌套循环或嵌套递归 例如我有两个列表 我必须检查它们的笛卡尔积的条件 解决这些类型问题的最佳方法是什么 有关如何简化这些类型的函数的任何指示吗 I ll elaborate a bit sin
  • PHP 日期/时间格式,需要一些帮助

    你能帮我使用 PHP 格式化以下日期吗 变量 start 包含以下日期 这个日期 Wed Feb 01 2012 05 00 00 GMT 080 应该成为 2012 02 01T13 00 00 我知道如何使用基本的 PHP 日期 时间格
  • 格式化 XmlGregorianCalendar 时区问题

    我需要将 java XmlGregorianCalendar 格式化为 yyMMdd 字符串 我的实现 XMLGregorianCalendar date getDate getting the date if date null Simp
  • Lisp 中的 (定义 (平均 ....))

    我只是在玩scheme lisp 并正在考虑如何纠正我自己的定义average 我不确定如何做一些我认为需要的事情 定义一个接受任意数量参数的过程 计算这些参数 将参数列表传递给 以将它们加在一起 有人有定义的例子吗average 我似乎对
  • SQL日期格式转换? [dd.mm.yy 至 YYYY-MM-DD]

    是否有 mySQL 函数可以将日期从 dd mm yy 格式转换为 YYYY MM DD 例如 03 09 13 gt 2013 09 03 由于您的输入是表单中的字符串03 09 13 我假设 因为今天是 2013 年 9 月 3 日 d
  • 为什么在谈论线程和进程时,“不要同时格式化软盘”的评论很有趣?

    我正在阅读之间的区别线程和进程 https stackoverflow com questions 200469 what is the difference between a process and a thread并在第二个答案中发现
  • 学习 LISP 的最佳方法是什么? [关闭]

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

    如何编写代码来更改多维数组中每个单独数组的值a出现负值后立即归零 所以里面的第二个数组a有负值 12 34 5 6 88 10 30 75 10 会将其所有值及其后的值转为零 将数组变成 12 34 5 6 88 0 0 0 我怎样才能获得
  • 使用 NSDateFormatter 从字符串中获取日期,无论 12 小时到 24 小时设置如何

    今天我的问题是关于日期格式和字符串 我的应用程序从互联网下载一些表示日期的字符串 日期格式始终是这样的 2010 05 24 at 20 45 我需要将此字符串转换为 NSDate 对象才能执行一些日期操作 我尝试了这段代码 NSStrin
  • 强制 clang-format 根本不碰评论

    我故意在行的开头提供一些注释 例如一些调试代码 并且不想缩进这些行 我同意 clang format 根本不碰 评论 他们全部 我发现的唯一设置是ReflowComments false仍然可以识别评论 我没有找到任何不缩进注释的设置 如果
  • 如何在 emacs 中自动回答是或否

    I binded function semantic symref to key C c C r like this global set key kbd C c C r semantic symref everytime I presse
  • 为什么 SBCL eval 函数会丢失它运行的宏?

    print x 打印出我想要评估的内容 但是 eval x 失败了 但如果我运行 x 它就可以了 我缺少什么 请告诉我为什么这不起作用 或者我是否在做一些愚蠢的事情 我正在尝试打印动态大小的表并设置 lambda 变量以最终计算表中每个单元
  • 在vscode中使用reactjs报错

    在 Visual Studio 代码中使用 jsx 语法 Visual Studio代码报错 请帮我 谢谢 符号 例如 而不是这样做 return lt button className square gt TODO lt button g
  • 正则表达式:如何找到模式的最大整数值?

    想象一下我有以下字符串 I ll have some 1 some 42 and maybe some 5 as well 基本上 我有兴趣了解遵循模式 integer 的最大整数值 我什至不确定是否可以使用正则表达式 我可以使用什么正则表
  • 为什么我们在 Lisp 中需要 funcall?

    为什么我们必须使用funcall在 Common Lisp 中调用高阶函数 例如 为什么我们必须使用 defun foo test func args funcall test func args 而不是更简单的 defun bar tes
  • 如何将日期格式设置为 1900 年代?

    我正在预处理数据 一列代表日期 例如 6 1 51 我正在尝试将字符串转换为日期对象 到目前为止我所拥有的是 date row 2 strip format m d y datetime object datetime strptime d
  • 将数字转换为英文字母列表

    我有下面的函数 它将数字输入转换为这些数字的部分翻译的单词输出 使用乘积和商 它将数字的单词表示相加 同时将数字分组 例如 number name 87969087 gt 87 million 969 thousand 87 number
  • 更改 Common Lisp REPL 中文本的颜色

    我想控制 Common Lisp 中显示的文本的颜色 像这样的伪代码 print color red hello blue world 有什么办法可以做到这一点吗 我使用 SBCL 我的 repl 位于 emacs 内 谢谢 您可以使用AN
  • swscaler 警告:使用了已弃用的像素格式

    我想先对视频帧执行颜色空间转换 然后使用以下代码将其转换为 opengl 纹理 struct SwsContext pSwsCtx sws getCachedContext NULL width height codec gt pix fm

随机推荐

  • 同时播放库中的视频并通过相机录制视频 - Objective c

    我正在构建一个应用程序 它可以播放库中的视频 同时使用相机录制视频 是否可以同时观看视频和录制视频 这里是链接 iPhone 媒体库中的示例 支持图像和视频here https github com yfujiki FGallery wit
  • for 循环中的 If 和Continue 语句

    我有一个forMatlab 中的循环 for 循环内的所有代码都包含在if陈述 例如 for p 1 length array if array p 1 Test positive for condition Generic code he
  • Subversion 合并历史可视化

    是否有任何实用程序可以绘制 subversion 存储库的合并历史记录的图片 我们总是使用 相当 一致的日志消息提交合并 并且能够自动将此信息提取到单个图片中会很方便显示什么时候发生了哪些分支 以及合并的状态是什么 我只是对信息工具感兴趣
  • SvelteKit 与 Nginx 返回响应错误 500

    我正在尝试建立SvelteKit项目并将其托管在服务器上nginx using sveltejs adapter static 该应用程序在本地开发时工作正常 但在构建并上传时我得到了500 JSON parse unexpected ch
  • 发布列表<接口> .net core 1.0

    我正在 net core 中构建一个动态表单创建器 表单 将由许多不同的表单元素组成 所以表单模型看起来像这样 public class FormModel public string FormName get set public Lis
  • 在 Hibernate 中使用 LIKE %

    我该如何使用LIKE 处于休眠状态 我想使用 SQLLIKE in my hbm xml文件 我有 2 个查询 我正在将其合并为 1 个 查询如下所示 select from PAY GROUP VW where CASE SID AND
  • 如何创建计算以从两个日期获取一个人的年龄?

    我正在尝试制定一种方法来计算一个人的年龄 我想在第二个下完成计算public static int getAge 如果这个人出生在当前日期之后 我希望它打印出错误 1 我如何比较两者SimpleDate values dateBd and
  • 动态更改 iframe 的 onload

    我有一个页面包含几个标签 我想动态更改他们的加载操作 我有以下代码 可以在 FF Safari Chrome Opera 中正常工作 但 IE 8 拒绝遵守 document getElementById myiframe onload f
  • 在Scala中,是否有一个预先存在的库函数用于将异常转换为选项?

    这基本上是包装 java 工厂方法 如果无法根据输入创建项目 这些方法会抛出异常 我正在基础库中寻找类似的内容 def exceptionToOption A f gt A Option A try Some f catch case e
  • 由于激活原因,无法使 QSystemTrayIcon 正常工作

    我使用的是 Ubuntu 12 04 虽然我可以创建带有可用菜单的托盘图标 但我无法控制其操作 trayIcon new QSystemTrayIcon this trayIcon gt setIcon QIcon icons Pictur
  • 与 php 算术相关

    y 013 echo y 5 this result in 16 我不明白它的答案怎么是16 有人可以帮忙吗 因为 013 不是十进制 以 10 为基数 它是八进制 基数为 8 十进制值为 0 8 2 1 8 1 3 8 0 0 8 3 1
  • 查找两个 numpy 数组之间的索引映射

    有没有好的方法进去numpy获取每个元素所在位置的逐元素索引array1 is in array2 一个例子 array1 np array 1 3 4 array2 np arange 2 5 1 dtype np int np wher
  • Xcode 调试器不会打印对象并显示 nil(当它们不打印时)

    尝试使用以下命令打印对象时 Xcode 显示错误po
  • PHP file_put_contents() 错误

    每次我尝试修改文件时 都会收到此错误 但我不知道这意味着什么 A PHP Error was encountered Severity Warning Message file put contents function file put
  • 如何在客户端授权的情况下使用 Microsoft.Graph 并且不会收到 401

    We have 创建了 Azure Active Directory 创建了一个新的应用程序 在 Azure AD 中注册新应用程序 授予 API 的所有权限 授予管理员权限 现在我们使用此应用程序凭据登录 我们获得授权 GET 11111
  • 如何以编程方式检测 64 位或 32 位机器?

    我不明白32位和64位是什么意思 人们似乎都说 64 位计算机运行速度更快 但为什么呢 这是否意味着有 64 位整数而不是 32 位整数 如果是这样的话 有没有办法编写一个程序来确定我们是在 32 位还是 64 位机器上 在 64 位机器上
  • 如何找到 Django 查询集中不在另一指定查询集中的实体?

    我正在使用 Django 为教育机构开发课程注册网站 假设我有两个 Django 查询集 一个包含占用会话 1 的课程 集合 A 另一个包含会话 2 中的课程 集合 B A session1 courses all B session2 c
  • iOS8 中的 AVPlayerItem addobserver 问题

    您好 我正在使用 AVPlayer 在 UITableViewCells 上播放视频 它在 iOS 7 上工作正常 但在 iOS8 中崩溃并出现以下错误 An instance 0x7c01b000 of class AVPlayerIte
  • 在 Clang 中使用指向成员和地址空间的指针

    我正在具有多个地址空间的目标上处理 C 代码 我想使用的代码有指向成员的指针 struct foo int bar int baz typedef int foo foo member foo member m foo bar define
  • 设置列表格式

    我有以下清单 X X O NIL NIL O NIL NIL O 我想将其格式化为如下所示 X X O O O 我也许可以用我对 Lisp 所知甚少的东西拼凑出一些东西FORMAT 但这可能会非常糟糕 任何指示将不胜感激 format t