页边距定期字数统计

页边距定期字数统计

我需要对作业进行连续的字数统计。这要么是页边空白处的注释,要么是每 100 个字左右在正文中加一个括号。例如,

----- TEXT ------|- MARGIN -
blahblahblahblah | 100 [100th word appears on this line]

关于如何做到这一点有什么想法吗?

答案1

我知道一种使用 GNU Emacs 应用程序的方法,但其局限性在于它无法识别乳胶代码(也许有人有建议?),因此只有在首先从乳胶代码中剥离出来时才会起作用:

C-u 100 M-f         ;; forward-word
M-F
M-W
SPACE               ;; insert space
\                   ;; self-insert-command
marginpar{          ;; self-insert-command * 10
C-y                 ;; yank
}                   ;; self-insert-command
M-b                 ;; backward-word
DEL                 ;; backward-delete-char-untabify

从那时起使用 F4(调用最后一个宏)将每 100 个单词执行一次你要求的操作(确保将光标放在 \marginpar{} 之后的单词上

答案2

这不是一个完整的答案。代码展示了如何使用 xelatex 进行字数统计的基本知识。我知道这根本不是你的设置。

\usepackage{xesearch}

\newcounter{words}
\AtBeginDocument{
    \setcounter{words}{0}
    \SearchList!{wordcount}{\stepcounter{words}}
        {a?,b?,c?,d?,e?,f?,g?,h?,i?,j?,k?,l?,m?,n?,o?,p?,q?,r?,s?,t?,u?,v?,w?,x?,y?,z?}
    \UndoBoundary{'’-}
    \MakeBoundary{„“‚‘–}
    \SearchOrder{p;}
}
\AtEndDocument{
    \StopSearching
    \newpage \thispagestyle{empty}
    \arabic{words} words in document
}

将边注破解进去可以满足我的需要\addtokomafont{section}{},但我不确定如何在计数器达到某个阈值时调用命令。

相关内容