Automatically assign a number to every paragraph

Question

I would like to add a marginal number (don't know the right term; in german „Randnummer“) to every paragraph of text I write. I don't see any other solution, than to write every single number manually with \marginpar. This is impossible, especially when you write longer texts. Does anyone know a good solution?

This image shows what I'd like to achieve. (from: grundrechteforum.de)

Answer 1

I don't think that overriding \everypar would give you the result that you want (at least not with changing a lot of other commands that also produce \pars in places that you don't want to have numbered).

An easy solution, that does however involve typing three additional characters per paragraph is to define a small command (say \p) that inserts a marginpar with the counter. In that way you can easily specify which paragraphs you want to have numbered. For example:

\documentclass{book}
\usepackage{mparhack}   % get marginpars to always show up on the correct side (need to compile twice)
\usepackage{lipsum}     % for dummy text

% change this to get the formatting you want
\newcommand{\parnum}{\bfseries\arabic{parcount}}

\newcounter{parcount}
\newcommand\p{%
    \stepcounter{parcount}%
    \leavevmode\marginpar[\hfill\parnum]{\parnum}%
}

\begin{document}    
\p \lipsum[1]

\p \lipsum[2]

\section{A section}

\p \lipsum[3-4]

\begin{enumerate}
  \item \p \lipsum[3-4]
  \item \p \lipsum[5]
\end{enumerate}
\end{document}

---

Alternatively, you can keep the definition of \everypar local by creating an environment:

\documentclass{book}
\usepackage{mparhack}   % get marginpars to always show up on the correct side (need to compile twice)
\usepackage{lipsum}     % for dummy text

% change this to get the formatting you want
\newcommand{\parnum}{\bfseries\arabic{parcount}}

\newcounter{parcount}
\newenvironment{parnumbers}{%
   \par%
   \everypar{\stepcounter{parcount}\leavevmode\marginpar[\hfill\parnum]{\parnum}}%
}{}

\begin{document}
\begin{parnumbers}
    \lipsum[1-10]
\end{parnumbers}

\section{A section}

\begin{parnumbers}
  \lipsum[4-5]
\end{parnumbers}
\end{document}

Keep in mind that inside the parnumbers environment you shouldn't use any complicated formatting (like lists or such).

Answer 2

As noted in another answer \everypar is used for multiple things in the LaTeX core. It's often redefined in one lexical scope or another, so using it for this might work, but you'd be fighting special cases all the way, which means it probably wouldn't be robust. If you do manage to get that to work, though (I may be pessimistic here), I'd like to see that.

If I recall correctly, a per-paragraph hook is useful enough that I think there's to be support for it in LaTeX 3, but that won't help just now, obviously.

When I've had to do a similar thing, I've just defined a simple macro which I invoke at the beginning of each paragraph:

\newcounter{paranum}
% The following isn't quite right,
% as it seems to slightly change the spacing after the first line,
% in some circumstances.
% Good enough for the moment, however.
\newcommand\p{\refstepcounter{paranum}%
  \hskip0pt
  \vadjust{%
    \vbox to 0pt{%
      \vss
      \ifodd\thepage
        \hbox to \textwidth{%
          \hfil
          \hbox to 0pt{\quad\emph{\tiny\theparanum}\hss}}
      \else
        \hbox to \textwidth{%
          \hbox to 0pt{\hss\emph{\tiny\theparanum}\quad}\hfil}
      \fi
      \vskip3pt}}}

This isn't ideal, as the comment notes, but it's worked for me, and been more fully adequate than I expected, so I've never been driven to improve it. Having an explicit \p macro to call isn't as neat as having it happen automatically, but it means I never get a paragraph being numbered gratuitously.

The \refstepcounter means that paragraphs are labellable.

The \ifodd test is likely to fail near the tops of pages. The TeX FAQ explains the problem and points to possible solutions.

Edited to add an even/odd distinction.

Answer 3

I don't think that hacking \everypar is really a good idea, as it might break all sorts of other things. It seems to me you need explicit markup for paragraphs. Here's an example using the titlesec package.

\documentclass[twoside]{report}
\usepackage{titlesec}
\usepackage{chngcntr}
\usepackage{lipsum} % for dummy text
\titleclass{\numpar}{straight}[\section]
\newcounter{numpar}
\renewcommand{\thenumpar}{\arabic{numpar}}
\counterwithout{numpar}{section} % from the chngcntr package
\titleformat{name=\numpar,page=odd}[rightmargin] {\normalfont
\bfseries\filright}
{\thenumpar}{.5em}{}
\titleformat{name=\numpar,page=even}[leftmargin] {\normalfont
\bfseries\filleft}
{\thenumpar}{.5em}{}
\titlespacing{\numpar}
{1pc}{0ex plus .1ex minus .2ex}{1pc}
\newcommand*{\newpar}{\numpar{}}
\begin{document}
\chapter{}
\section{A section}
\newpar\lipsum[1]
\newpar\lipsum[2]
\newpar\lipsum[3]
\newpar\lipsum[4]
\newpar\lipsum[5]
\end{document}

This is set up to put the numbers in the outer margins in a two-sided document (which would be normal for a book.)

Answer 4

\documentclass[12pt]{article}
\usepackage{lipsum}

\makeatletter
\newenvironment{numberedpars}{%
  \setcounter{secnumdepth}{4}
  \renewcommand\theparagraph{\arabic{paragraph}}
  \renewcommand\@seccntformat[1]
  {\expandafter\ifx\csname##1\endcsname\paragraph\csname 
  the##1\endcsname\else\csname the##1\endcsname\quad\fi}
  \let\old@par=\par
  \def\new@par{\let\par=\old@par\paragraph{}\let\par=\new@par}
  \let\par=\new@par
  \par
}{}
\makeatother

\begin{document}

\begin{numberedpars}
foo \par
\lipsum 
\end{numberedpars}

\end{document} 

and the same for outer par numbers in twoside mode

\makeatletter
\newenvironment{numberedpars}{%
  \setcounter{secnumdepth}{4}%
  \renewcommand\theparagraph{%
    \protect\marginpar[\hfill\bfseries\arabic{paragraph}]
                      {\bfseries\arabic{paragraph}}}%
  \renewcommand\@seccntformat[1]%
    {\expandafter\ifx\csname##1\endcsname\paragraph\csname%
     the##1\endcsname\else\csname the##1\endcsname\fi}%
  \let\old@par=\par%
  \def\new@par{\vspace*{-\normalbaselineskip}%
          \let\par=\old@par\paragraph{}\hspace*{-1em}\let\par=\new@par}%
  \let\par=\new@par%
  \par
}{}
\makeatother

Answer 5

Here's another answer along the lines of putting the paragraphs in an environment.

\documentclass{article}
\usepackage{lipsum}
\usepackage[excludeor]{everyhook}
\newcounter{parcount}
\newif\ifnumberedpars
\newenvironment{numberedpars}{%
        \PushPreHook{par}{%
                \ifnumberedpars
                        \stepcounter{parcount}%
                        \numberedparsfalse
                        \marginpar{\arabic{parcount}}%
                        \numberedparstrue
                \fi
        }%
        \numberedparstrue
}{%
        \PopPreHook{par}%
}
\begin{document}
\begin{numberedpars}
\lipsum
\end{numberedpars}
\end{document}

The code is fairly straight forward. At the beginning of the environment, it pushes a new hook for \everypar. At the end of the environment, it pops that hook off.

Answer 6

The \everypar-"hook" could be used I suppose. But I have a sneaking suspicion there might be issues.

\newcount\parcount
\everypar{\global\advance\parcount by 1\llap{\bf\the\parcount\qquad}}
\hsize=.5\hsize % just to show the effect
First paragraph with some lorem ipsum: Lorem ipsum dolor sit amet.

Second paragraph with some more of that gool old loprem ipsum goodness. Lorem ipsum dolor sit amet.

This probably isn't very robust
\bye

Answer 7

FWIW, ConTeXt has a built-in command \setupparagraphnumbering to enable numering of paragraphs. It works correctly with section titles.

\setupparagraphnumbering[state=start,style=bold,distance=0.5em]

\starttext
\dorecurse{2}{
\startsection[title={Knuth quote}]
  \input knuth 
\stopsection}
\stoptext

Answer 8

If you want to restart the counting in every environment, add a line to the end of environment.

   \setcounter{parcount}{0}

The whole codes are here:

\documentclass{book}
\usepackage{mparhack}   % get marginpars to always show up on the correct side (need to compile twice)
\usepackage{lipsum}     % for dummy text

% change this to get the formatting you want
\newcommand{\parnum}{\bfseries\arabic{parcount}}
\newcounter{parcount}
\newenvironment{parnumbers}{%
\par%
   \everypar{\stepcounter{parcount}\leavevmode\marginpar[\hfill\parnum]
{\parnum}}%
\setcounter{parcount}{0}%to restart numbering in every envirement
}{}

\begin{document}
\begin{parnumbers}
\lipsum[1-4]
\end{parnumbers}

\begin{parnumbers}
\lipsum[5-8]
\end{parnumbers}

\begin{parnumbers}
\lipsum[9-10]
\end{parnumbers}

\section{A section}
\begin{parnumbers}
  \lipsum[4-5]
\end{parnumbers}
\end{document}

Answer 9

There is also a class called jurabook in German to achieve numbered paragraphs easily.