Emacs 如何运行缓冲区的总和？

所以，从我的日志文件中，我处理了一些字符串，最后得到了这个结果，比如说缓冲区名称1

如何获取给定缓冲区的总和

(defun sum-of-buffer (buf)
  (interactive "bBuffer Name: ")
   ....
  (message "%i" sum))

或者是否有一个方便的函数组合？

使用calc如何-选择矩形形状的区域-并键入：C-u C-x*：

或者，怎么样

(let ((sum 0))
  (save-excursion
    (goto-char (point-min))
    (while (re-search-forward "[0-9]*\\.?[0-9]+" nil t)
      (setq sum (+ sum (string-to-number (match-string 0))))))
  sum)

使用calc如何-选择矩形形状的区域-并键入：C-u C-x*：

或者，怎么样

(let ((sum 0))
  (save-excursion
    (goto-char (point-min))
    (while (re-search-forward "[0-9]*\\.?[0-9]+" nil t)
      (setq sum (+ sum (string-to-number (match-string 0))))))
  sum)

---

如果您在Unix机器上，C-x h M-|然后是awk'{s+=$1}END{print s}'。

如果您在Unix机器上，C-x h M-|然后是awk'{s+=$1}END{print s}'