从 emacs 组织模式表中提取字段值

Question

分隔符：我是 emacs 新手。 我正在尝试创建一个通过 org-table 并提取特定值并对它们进行一些算术运算的函数。算术与我的问题无关，但我无法将字段值放入整数或浮点数列表中。

例如函数

(defun print-field-value()
  (interactive)
  (setq list '())
  (unless (org-table-p) (error "Not in an org-table"))
  (goto-char (org-table-begin))
  (org-table-next-field)
  (while (org-table-p)
  (add-to-list 'list (save-excursion (org-table-get-field 1)))
  (forward-line))
  (print list)
)

在桌子上执行时

|  7 |  8 |  9 | 10 | 11 | -12 |
| 78 | 46 | 00 | 36 | 64 |  98 |

产生输出

(#(" 78 " 0 4 (fontified t face org-table)) #("  7 " 0 4 (fontified t face org-table)))

我有两个问题要问社区： 1. 我的清单中有哪些元素？ （什么类型的物体或那些） 2. 有没有一种方法可以将整数放入一个列表中，这样我就可以轻松地对这些值执行一些算术运算？

理想情况下，我正在寻找一种简单的方法来执行此操作，而无需创建另一个函数来解析上述函数返回的内容并提取整数。我的直觉（可能有缺陷）是应该有一种更简单的方法来做到这一点。我说的对吗？

Answer 1

#(" 78 " 0 4 (fontified t face org-table)) 是一个字符串，在 C 中它只会被记为" 78 "。接下来，您无需打印即可返回结果：在您的代码中放置 list 而不是 print list 就足够了。

如果您想在 emacs 中发现任何模式，请使用其所有函数具有相同前缀的事实。在这里，运行 describe-function org-table- 并按两次 TAB 以获取适用于 org 表的所有函数的列表。然后，您将看到有希望的函数org-table-analyze，并阅读其文档。这样你可能会想出以下内容：

(defun get-field-values ()
  (unless (org-table-p) (error "Not in an org-table"))
  (org-table-analyze)
  (mapcar
   (lambda (i)
     (mapcar (lambda (j) (string-to-number (org-table-get i j)))
         (number-sequence 1 org-table-current-ncol)))
   (number-sequence 1 (1- (length org-table-dlines)))))

它将为您提供字段矩阵，作为数字列表的列表。注意这个函数不是交互式的，你用M-:运行它