识别神秘的“R”符号

识别神秘的“R”符号

有人知道如何在乳胶中排版下图最左边的“R”符号吗?我使用了 Detexify 并查看了完整列表,但没有成功。

它出现在 Knuth 的《计算机编程艺术》第 4 卷第 47 页的一张表格中。其含义在右侧给出。

答案1

对于初次尝试来说还不错。我过去常常将\KnRgap要构建符号的字段放在一边。然后我习惯\stackinset在空白字段上嵌套叠加层。我开始使用 (IE,最内插图)\supset在场地的右上角添加一个缩放的棍子,然后\rule在左上角添加两根棍子,最后\rule在右下角添加一根旋转的棍子。

为了完成它,我在新创建的字形的左边和右边添加了一个字距点。

\documentclass{article}
\usepackage{stackengine}
\usepackage{graphicx}
\def\KnRgap{\rule{1.63ex}{0ex}\rule[-.3ex]{0ex}{1.8ex}}
\def\KnR{\kern1pt%
\stackinset{r}{0pt}{b}{0pt}{\rotatebox{53}{\rule{.08ex}{1.3ex}}}{%
\stackinset{l}{0pt}{t}{.02ex}{\rule{.08ex}{1.8ex}}{%
\stackinset{l}{.02ex}{t}{0pt}{\rule{1ex}{.08ex}}{%
\stackinset{r}{0pt}{t}{.02ex}{\scalebox{.76}{$\supset\mkern -2mu$}}{%
\KnRgap%
}}}}\kern1pt%
}
\begin{document}
\KnR~~Right projection; second dictator%
\end{document}

在此处输入图片描述

如果感觉 的\supset“腿”向左突出太多,可以通过从mathabx包中导入一个符号来代替它:

\documentclass{article}
\DeclareFontFamily{U}{matha}{\hyphenchar\font45}
\DeclareFontShape{U}{matha}{m}{n}{
      <5> <6> <7> <8> <9> <10> gen * matha
      <10.95> matha10 <12> <14.4> <17.28> <20.74> <24.88> matha12
      }{}
\DeclareSymbolFont{matha}{U}{matha}{m}{n}
\DeclareMathSymbol{\varcup}{3}{matha}{"59}

\usepackage{stackengine}
\usepackage{graphicx}
\def\KnRgap{\rule{1.45ex}{0ex}\rule[-.3ex]{0ex}{1.8ex}}
\def\KnR{\kern1pt%
\stackinset{r}{0pt}{b}{0pt}{\rotatebox{45}{\rule{.08ex}{1.14ex}}}{%
\stackinset{l}{0pt}{t}{.02ex}{\rule{.08ex}{1.8ex}}{%
\stackinset{l}{.02ex}{t}{0.0pt}{\rule{.7ex}{.08ex}}{%
\stackinset{r}{0pt}{t}{0.0ex}{\scalebox{.81}{%
  \rotatebox{90}{$\varcup\mkern -2mu$}}}{%
\KnRgap%
}}}}\kern1pt%
}
\begin{document}
\KnR~~Right projection; second dictator%
\end{document}

在此处输入图片描述

相关内容