TA的回答 - LaTeX问答

问 TeXstudio中无法使用asymptote来绘图

关于「LaTeXer」提到的「宏包说明」：

参见： https://ask.latexstudio.net/ask/question/17794.html

0 条评论收藏感谢

问是否有成熟的方案绘制如下的圆锥曲线的图像？

一个基于tkz-elements+tkz-euclide的方案如下：

% lualatex
\documentclass[tikz,border=5pt]{standalone}
\usepackage[mini]{tkz-euclide}
\usepackage{tkz-elements}
\usepackage{fouriernc}
\directlua{
    init_elements()
    z.O = point(0, 0)
    z.F = point(1, 0)
    z.m = point(-1, 1)
    z.n = point(-1, -1)
    L.mn = line(z.m, z.n)
    CO.PA = conic(z.F, L.mn, 1)
    PA.curve = CO.PA:points(-6, 6, 100)
    slope = 1.1 -- you can modify the slope of Line.AB
    z.Fp = z.F + point(1,slope)
    L.AB = line(z.F, z.Fp)
    z.B, z.A = intersection(CO.PA, L.AB)
    z.Fpp = z.F:rotation( -math.pi / 2, z.Fp )
    L.CD = line(z.F, z.Fpp)
    z.C, z.D = intersection(CO.PA, L.CD)
}
\begin{document}
\begin{tikzpicture}
\tkzGetNodes
\tkzInit[xmin=-1,xmax=9,ymin=-6,ymax=4]
\tkzDrawX[noticks,thick]\tkzDrawY[noticks,thick]
\tkzDrawCoordinates[smooth,thick](PA.curve)
\tkzDrawSegments[thick](A,B C,D)
\tkzDrawPoints[blue](O,F,A,B,C,D)
\tkzLabelPoints[below left](O)
\tkzLabelPoints[below=3pt](A,D,F)
\tkzLabelPoints[right](B,C)
\end{tikzpicture}
\end{document}

一个显然的优点是方便控制「斜率参数」、「坐标轴长度」、「抛物线的焦点准线参数」等...

不过有点小瑕疵，如何使用一行命令控制全局的line width=1pt呢，不知为何\tkzSetUpLine并不能对图里的所有线都生效ε=( o｀ω′)ノ

0 条评论收藏感谢

问 macOS下标题华文宋体汉字和TimeNewRoman英文数字基线不对齐的问题？

XeLaTeX下没有可以调整字体基线的方式，但是LuaLaTeX可以，详情可查阅luatex-ja的文档：

\documentclass{ctexart}
\setmainfont{Times New Roman}
% TeXpage:fandol-song + Time New Roman
\begin{document}

\bfseries

调整前：

1. 这是中文

1.1 这是中文

1.1.1 这是中文

\bigskip

调整后：

{
\ltjsetparameter{yjabaselineshift=-1pt}
2. 这是中文

2.1 这是中文

2.1.1 这是中文
}
\end{document}

0 条评论收藏感谢

问顶部导航条如何使用section短标题

请尽可能提供具体是如何解决的，否则这个页面的问题没有任何意义，对后来人无法提供任何帮助。

0 条评论收藏感谢

问顶部导航条如何使用section短标题

具体是怎么不可更改，这与模板/主题的设置也有关系，请提供可以编译的完整代码。

零个人知道你具体遇到了什么问题...

0 条评论收藏感谢

问去掉 `\fakeverb` 和 `\texttt` 中的中文与符号之间的空格?

或许试试这个...

\documentclass[fontset=fandol,12pt]{ctexart}
% \xeCJKsetup{Verb=true}
\usepackage{tabularray}
\usepackage{codehigh}%
\usepackage[most]{tcolorbox}
\begin{document}
\begin{tcblisting}{colback=red!5!white,colframe=red!75!black}
\xeCJKVerbAddon
\verb|boxrule=<长度>| \verb|boxrule=<length>|%

\begin{verbatim}
boxrule=<长度> boxrule=<length>
\end{verbatim}

\begin{tblr}{l}%
\fakeverb{boxrule=<长度>} \fakeverb{boxrule=<length>}%
\end{tblr}%

\fakeverb{boxrule=<长度>} \fakeverb{boxrule=<length>}%

\texttt{boxrule=<长度>} \texttt{boxrule=<length>}%

\texttt{boxrule=<}长度\texttt{>} \texttt{boxrule=<length>}%
\xeCJKOffVerbAddon
\end{tcblisting}
\end{document}

3 条评论收藏感谢

问在alogorithm2e宏包中如何设置`While`后的关键字为宋体/罗马正体？

我没有细看文档，但似乎「\SetArgSty」可以修改这里的样式

\SetArgSty{<font>} sets the argument typography (by default: emph).

\documentclass[fontset=fandol]{ctexart}
\usepackage{graphicx} % Required for inserting images
\usepackage[ruled,vlined,linesnumbered]{algorithm2e}
\usepackage{amsmath,amsfonts}

\begin{document}
\SetArgSty{textup}%
\section{Introduction}

\begin{algorithm}[H]
    \SetAlgoLined
    \KwData{this text}
    \KwResult{how to write algorithm with \LaTeX2e}
    \While{not at end of this document}{
        read current\; 
        \eIf{understand}{
        go to next section\;
        current section becomes this one\;
        }{
        go back to the beginning of current section\;
        }
    }
\end{algorithm}

\begin{algorithm}[htb]
    \SetAlgoLined
    \KwResult{每个时间步的参数$\theta$}
        \For{第$1,2,\dots,n$个时间步}{
        对上一步的态$|\psi(\theta_t) \rangle$作用时间演化算子$e^{-iH\Delta t}$，得参照态$e^{-iH\Delta t}|\psi(\theta_t) \rangle$ \;
        初始化$\theta = \theta_t$ \;
        求惩罚函数的梯度$\nabla_{\theta}C(\theta)$ \;
        \While{$|\nabla_{\theta}C(\theta)| > \text{grad}_{\text{tol}}$ 且 $\text{count} < \text{count}_{\text{max}}$}{
        根据梯度$\nabla_{\theta}C(\theta)$，利用ADAM优化器更新参数$\theta$ \;
        $\text{count}$加1 \;
        求惩罚函数的梯度$\nabla_{\theta}C(\theta)$ \;
        }
    }  
\end{algorithm}

\end{document}

嗯...因为我懒得读完全部文档...所以未必是好的实践...

0 条评论收藏感谢

问在elegantbook模板中如何修改「proof」命令为带编号的形式？

注意到elegantbook.cls中对proof的定义，修改一下即可.

% Line 1192~1196
\newenvironment{proof}{
  \par\noindent\textbf{\color{second}\proofname\;}
  \color{black!90}\cfs}{
  % \hfill$\Box$\quad
  \par}

其实手动指定硬编码数字「2」也是不够好的...

\documentclass[lang=cn]{elegantbook}
\usepackage{zhlipsum}%
\renewenvironment{proof}[1][]{%
  \par\noindent\textbf{\color{second}\proofname\;#1\;}
  \color{black!90}\cfs}{
  % \hfill$\Box$\quad
  \par}%
\begin{document}

\begin{proof}
    显然。
\end{proof}

\begin{proof}[(2)]
    显然。这是一个证明：\zhlipsum[2]
\end{proof}

\begin{proof}[「5」]
    显然。这是另一个证明：\zhlipsum[2]
\end{proof}

\end{document}

0 条评论收藏感谢

问「日经问题」Elegantbook中定理定义环境内容使用\textbf{}命令进行加粗无效

补充一些信息...

需要注意到在elegantbook.cls中的definition环境的定义为：

% Line 1079
\ELEGANT@newtheorem{definition}{defstyle}

% Line 902
  \tcbset{
    common/.style={
      fontupper=\citshape,
      lower separated=false,
      % before upper={\setlength{\parindent}{\normalparindent}},
      coltitle=white,
      colback=gray!5,
      boxrule=0.5pt,
      fonttitle=\bfseries,
      enhanced,
      breakable,
      top=8pt,
      before skip=8pt,
      attach boxed title to top left={
        yshift=-0.11in,
        xshift=0.15in},
      boxed title style={
        boxrule=0pt,
        colframe=white,
        arc=0pt,
        outer arc=0pt},
      separator sign={.},},
    defstyle/.style={
      common,
      colframe=main,  
      colback=main!5,
      colbacktitle=main, 
      overlay unbroken and last={
        \node[anchor=south east, outer sep=0pt] at (\linewidth-width,0) {
          \textcolor{main}{$\clubsuit$}};}},
          ...

其中fontupper=\citshape使用的定义为：

\ifcsname kaishu\endcsname
 \newcommand{\citshape}{\kaishu}
\else
 \newcommand{\citshape}{\itshape}
\fi

所以要想在定义环境里加粗，需要保证「楷体」有粗体的字重，或者使用伪粗体...

在windows系统下默认fontset=windows，将默认使用「中易楷体」(a.k.a. simkai.ttf)，没有粗体字重
在texpage/overleaf/ubuntu下默认为fontset=fandol，默认使用「fandol-kai」同样没有粗体字重
使用fontset=ubuntu使用的是思源字库（win下需要自行安装），其对应使用的楷体为「gkai00mp.ttf」(似乎是文鼎楷体)，同样没有粗体的字重
啸行老师上面的回答里使用了「方正楷体」（可以使用fontset=founder），其楷体字形是有粗体的，因此表现正常

P.S.一个 不推荐 的方式是使用「伪粗体」，如下在windows的例子：

\documentclass[lang=cn]{elegantbook}
\setCJKfamilyfont{zhkai}[AutoFakeBold]{simkai.ttf}
\renewcommand*{\kaishu}{\CJKfamily{zhkai}}
\begin{document}

\begin{definition}
    你好，我想要在这里\textbf{加粗}哈哈哈
    
    我在windows下用的是「中易楷体」，没有粗体
\end{definition}

\end{document}

Edited

其实也可以改一下让定义环境里不使用楷体，而是使用常见的宋体.作为示例：

\documentclass[lang=cn]{elegantbook}
\tcbset{common/.append style={fontupper=\normalfont}}
\begin{document}

\begin{definition}
    你好，我想要在这里\textbf{加粗}哈哈哈
    
    我现在在windows下用的是「中易宋体」，没有粗体，所以改用「中易黑体」做为粗体
\end{definition}

\end{document}

或者使用fandol-song

\documentclass[lang=cn,fontset=fandol]{elegantbook}
\tcbset{common/.append style={fontupper=\normalfont}}
\begin{document}

\begin{definition}
    你好，我想要在这里\textbf{加粗}哈哈哈
    
    我现在在windows下用的是「fandol宋体」，他有粗体
\end{definition}

\end{document}

核心原因还是因为elegant-latex对common这个style使用了楷体，但是有粗字重的楷体太少了...

0 条评论收藏感谢

问 macOS下标题华文宋体汉字和TimeNewRoman英文数字基线不对齐的问题？

该问题的最小工作示例其实可以更短：

\documentclass[AutoFakeBold]{ctexart}
\setmainfont{Times New Roman}
\begin{document}
{\zihao{-2}\songti\bfseries%

1. 问题复现

1.1 问题描述

1.1.1 问题背景

2. 工作人员

2.1 工作人员

2.1.1 工作人员

}
\end{document}

总结一下上面的测试结果：

windows: simsum.ttc与Time New Roman的基线比较匹配
macOS: STsong.ttf与Time New Roman的基线不匹配
ubuntu: fandol-song.ttf与Time New Roman的基线不匹配

至于怎么办嘛，看格式要求

如果格式要求就是：宋体+TNR，最好使用中易宋体

否则可以考虑替换西文字体，并不是任意两个西文字体和中文字体都是那么匹配的...

1 条评论收藏感谢

问如何在不手动更改`beamer.cls`第·376·行代码的情况下消除`hyperref`和`cleveref`之间的冲突？

2025年，可以不用cleveref而改用zref-clever:

\documentclass{beamer}
\usepackage{hyperref}
% \usepackage{cleveref}
% \crefformat{equation}{\mbox{Eq. #2(#1)#3}}
% \crefrangeformat{equation}{\mbox{Eqs. #3(#1)#4 to #5(#2)#6}}
% \crefmultiformat{equation}{\mbox{Eqs. #2(#1)#3}}{ and #2(#1)#3}{, #2(#1)#3}{ and #2(#1)#3}
% \crefrangemultiformat{equation}{\mbox{Eqs. #3(#1)#4 to #5(#2)#6}}{ and #3(#1)#4 to #5(#2)#6}{, #3(#1)#4 to #5(#2)#6}{ and #3(#1)#4 to #5(#2)#6}

\usepackage{zref-clever}
\zcRefTypeSetup{equation}{
    name-sg={eq.},
    name-pl={eqs.},
    Name-sg={Eq.},
    Name-pl={Eqs.},
}

\begin{document}

\begin{frame}{Title Here}

    \begin{block}

        \begin{align}
            A  &= B
            \label{eq1}
            \\
             &= C
             \label{eq2}
             \\
             &= D
             \label{eq3}
        \end{align}

    \end{block}

\end{frame}


\begin{frame}{Title Here}

    \begin{block}

        \begin{align}
            A  &= B
            \label{eq4}
            \\
             &= C
             \label{eq5}
             \\
             &= D
             \label{eq6}
        \end{align}

    \end{block}

\end{frame}

\begin{frame}{Title Here}

\begin{block}

    \begin{align}
    A  &= B
    \label{eq7}
    \\
    &= C
    \label{eq8}
    \\
    &= D
    \label{eq9}
    \end{align}

\end{block}

\end{frame}

\begin{frame}
    contents in between
\end{frame}


\begin{frame}

    % \cref{eq1} 

    % \cref{eq1,,eq2}

    % \cref{eq1,eq2,eq3} 

    % \cref{eq1,eq2,eq3,eq7,eq8,eq9} 

    % \cref{eq1,,eq2,,eq3,eq7,eq8,eq9} 

    % \cref{eq6,eq7,eq9} 

    % Eq. \ref{eq1} 
   

    \zcref[S]{eq1} 

    \zcref[S]{eq1,,eq2}

    \zcref[S]{eq1,eq2,eq3} 

    \zcref[S]{eq1,eq2,eq3,eq7,eq8,eq9} 

    \zcref[S]{eq1,,eq2,,eq3,eq7,eq8,eq9} % I want "Eqs. (1),(2),(3) and (7) to (9)"

    \zcref[S]{eq6,eq7,eq9} 

    Eq. \zref{eq1} 
\end{frame}

\end{document}

这样不会报任何警告，虽然「编号形式受到\seq_set_from_clist:Nn对clist的解析小问题」，但是很少会用到\cref{eq1,,eq2,,eq3,eq7,eq8,eq9}这样故意空格的需求...

0 条评论收藏感谢

问 tkz-euclide 宏包绘图中图形填充方式

有些重叠的区域填充两种不同的颜色，会互相遮挡和影响。

从你的第二张图来看，这种遮挡似乎不影响你看图、识别三角形和做题.

如果三角形AMB和三角形QME用合适的阴影方式来填充的话，怎么处理为宜。
我想着主要填充的区域用颜色；次要或者小点的填充区域用阴影，就是哪种相对稀疏的斜杠线阴影。但一直操作不成功。

在tikz中可以使用patterns库，详见这个链接. 事实上你已经调用了，但不知为何你没有去查阅这部分的文档.

\documentclass[tikz,border=5pt]{standalone}
\usepackage{tkz-base}
\usepackage{tkz-euclide}
\usetikzlibrary{patterns,patterns.meta}
\begin{document}
\begin{tikzpicture}
        % ===== 1. 绘制平面直角坐标系 =====
        \tkzInit[xmin=-2.5, xmax=4.5, ymin=-1, ymax=6.3]
        \tkzDrawXY[thick, noticks, >=latex]
        
        % ===== 定义点 =====
        \tkzDefPoints{0/0/O, 0/4/A, 2/0/B, 0/2/E}
        
        \tkzDefTriangle[two angles=90 and 45](A,B)
        \tkzGetPoint{C}
        
        \tkzDefPointBy[projection=onto O--B](C)
        \tkzGetPoint{c}
        
        \tkzDefPointBy[projection=onto C--c](E)
        \tkzGetPoint{e}
        
        \tkzInterLL(C,c)(E,e)
        \tkzGetPoint{D}
        
        \tkzDefMidPoint(E,B)
        \tkzGetPoint{M}
        
        \tkzInterLL(D,M)(O,B)
        \tkzGetPoint{Q}
        
        \tkzCalcLength(A,M)
        \tkzGetLength{dAM}
        
        \tkzDefPointWith[linear normed,K=-\dAM](M,A)
        \tkzGetPoint{Q}
        
        \tkzInterLL(E,D)(A,B)
        \tkzGetPoint{N}


        \tkzFillPolygon[yellow!50, opacity=.5](A,D,C)
        \tkzFillPolygon[yellow!50, opacity=.5](E,Q,D)
        
        \tkzFillPolygon[pattern=north east lines, pattern color=teal](E,Q,M)
        \tkzFillPolygon[pattern={Stars[points=6]},pattern color=magenta](A,B,M)
        
        % ===== 绘制图形 =====
        \tkzDrawSegments[thick](E,B A,M D,M) 
        \tkzDrawPolygon[red, thick](A,B,C)
        \tkzDrawPolygon[blue, thick](E,C,D)
        
        \tkzDrawSegments[dashed, purple!50, thick](Q,M A,D D,Q E,Q) 
        
        % ===== 标示点 =====
        \tkzLabelPoints[above right](C,N)
        \tkzLabelPoints[left](A,E)
        \tkzLabelPoints[right](D)
        \tkzLabelPoints[below](B,Q)
        \tkzLabelPoints[below left](O,M)
    \end{tikzpicture}
\end{document}

注意最好把：

        \tkzFillPolygon[yellow!50, opacity=.5](A,D,C)
        \tkzFillPolygon[yellow!50, opacity=.5](E,Q,D)
        \tkzFillPolygon[pattern=north east lines, pattern color=teal](E,Q,M)
        \tkzFillPolygon[pattern={Stars[points=6]},pattern color=magenta](A,B,M)

放到：

        % ===== 绘制图形 =====
        \tkzDrawSegments[thick](E,B A,M D,M) 
        \tkzDrawPolygon[red, thick](A,B,C)
        \tkzDrawPolygon[blue, thick](E,C,D)
        \tkzDrawSegments[dashed, purple!50, thick](Q,M A,D D,Q E,Q)

之前，避免不正确的绘制顺序带来的遮挡。

0 条评论收藏感谢

问如何在ctexart下实现这个环境？

\documentclass{article}
\usepackage[tt=false]{libertine}
\usepackage{framed}
\usepackage{lipsum}
\newcounter{question}
\newcounter{solution}
\ExplSyntaxOn
\clist_new:N \g_ljh_answer_clist
\cs_generate_variant:Nn \clist_if_in:NnT { NeT }
% 辅助宏 from: https://mp.weixin.qq.com/s/Mc3QawPiD6WnREZejFxigg
\cs_set_nopar:Npn \__module_range_to_list:nN #1#2 {
  \seq_set_split:Nnn \l__module_tmpa_seq { , } { #1 }
  \seq_map_inline:Nn \l__module_tmpa_seq 
  {
    \tl_if_in:nnTF { ##1 }{ - }
    {
      \seq_set_split:Nnn \l__module_tmpb_seq { - } { ##1 }
      \int_step_inline:nnn 
      { \seq_item:Nn \l__module_tmpb_seq { 1 } } 
      { \seq_item:Nn \l__module_tmpb_seq { 2 } } 
      {
        \clist_put_right:Nn #2 { ####1 }
      }
    }
    {
      \clist_put_right:Nn #2 { ##1 }
    }    
  }
}
\NewDocumentEnvironment{question}{+b}{
    \refstepcounter{question}
    \begin{leftbar}
    \noindent \textsf{Question\ \thequestion :}\quad {#1}
    \end{leftbar}
}{}
\NewDocumentEnvironment{solution}{+b}{
    \refstepcounter{solution}
    % why not \clist_if_in:NVT(?)
    \clist_if_in:NeT \g_ljh_answer_clist {\thesolution}
    {
        \begin{leftbar}
        \noindent \textsf{Solution\ \thesolution :}\quad {#1}
        \end{leftbar}
    }
}{}
\NewDocumentEnvironment{Exercises}{ o +b }{
    \group_begin:
    \setcounter{question}{0}
    \setcounter{solution}{0}
    \clist_gclear:N \g_ljh_answer_clist
    \IfNoValueTF{#1}
    {%这里的逻辑没处理太好，不太容易获取这个Exercises一共有多少题目
     %大胆一点...不过效率会不会变低呢(・∀・(・∀・(・∀・*)
        % \int_step_inline:nn {99}{\clist_gput_right:Nn \g_ljh_answer_clist {##1}}
        \__module_range_to_list:nN {1-99} \l_tmpa_clist
    }
    {
        \__module_range_to_list:nN {#1} \l_tmpa_clist
    }
    \clist_gset_eq:NN \g_ljh_answer_clist \l_tmpa_clist
    #2
    \group_end:
}{}
\ExplSyntaxOff
\begin{document}

\begin{Exercises}[1,3-4]
\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\lipsum[1]

\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}
\end{Exercises}


\newpage

\begin{Exercises}
\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\lipsum[2]

\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\begin{question}
    What is the meaning of life?
\end{question}

\begin{solution}
    The meaning of life is a philosophical question regarding the significance of life or existence in general. Many people and cultures have different interpretations of this concept.
\end{solution}

\end{Exercises}

\end{document}

3 条评论收藏感谢

问在ctexart框架中，希望不借助tocloft的设置修改「目录」的对齐情况而不影响`\section*`

来自Eureka的答案：

\documentclass[fontset=fandol]{ctexart}
\ctexset{section/format+={\raggedright}}
\renewcommand*{\tableofcontents}{%
  {\hfill\textbf{\Large\contentsname}\hfill}
  \UseName{@mkboth}%
    {\MakeUppercase\contentsname}%
    {\MakeUppercase\contentsname}%
  \UseName{@starttoc}{toc}%
}
\parindent=0pt
\begin{document}

\tableofcontents

\section{aaaa}

\section{bbbb}

\section{cccc}

\section*{ddd}

\end{document}

不过这里添加的代码量也相比稍长...

BTW,这里的样式为了保持一致，需要用到：

latexdef \section

\section:
\long macro:->\@startsection {section}{1}{\z@ }{-3.5ex \@plus -1ex \@minus -.2ex}{2.3ex \@plus .2ex}{\normalfont \Large \bfseries }

0 条评论收藏感谢

问关于amsart修改permission页面样式的问题？

改的不是很好。

注意到amsart.sty中的：

% line 524~549
\def\@setaddresses{\par
  \nobreak \begingroup
\footnotesize
  \def\author##1{\nobreak\addvspace\bigskipamount}%
  \def\\{\unskip, \ignorespaces}%
  \interlinepenalty\@M
  \def\address##1##2{\begingroup
    \par\addvspace\bigskipamount\indent
    \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
    {\scshape\ignorespaces##2}\par\endgroup}%
  \def\curraddr##1##2{\begingroup
    \@ifnotempty{##2}{\nobreak\indent\curraddrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      ##2\par}\endgroup}%
  \def\email##1##2{\begingroup
    \@ifnotempty{##2}{\nobreak\indent\emailaddrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      \ttfamily##2\par}\endgroup}%
  \def\urladdr##1##2{\begingroup
    \def~{\char`\~}%
    \@ifnotempty{##2}{\nobreak\indent\urladdrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      \ttfamily##2\par}\endgroup}%
  \addresses
  \endgroup
}

其中关键的部分为

    \par\addvspace\bigskipamount\indent
    \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
    {\scshape\ignorespaces##2}\par\endgroup}%

可以修改为「去掉小括号」+「去掉地址的小型大写字体」+「修改缩进」 +「编组内给姓名设置小体大写」...

    \par\addvspace\bigskipamount
    %\indent
    % \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
    \@ifnotempty{##1}{{\scshape\ignorespaces\noindent##1\unskip\par}}%
    % {\scshape\ignorespaces##2}\par\endgroup}%
    {\ignorespaces\noindent##2}\par\endgroup}%

完整代码：

\documentclass[11pt]{amsart}

\makeatletter
\def\@setaddresses{\par
  \nobreak \begingroup
\footnotesize
  \def\author##1{\nobreak\addvspace\bigskipamount}%
  \def\\{\unskip, \ignorespaces}%
  \interlinepenalty\@M
  \def\address##1##2{\begingroup
    \par\addvspace\bigskipamount
    %\indent
    % \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
    \@ifnotempty{##1}{{\scshape\ignorespaces\noindent##1\unskip\par}}%
    % {\scshape\ignorespaces##2}\par\endgroup}%
    {\ignorespaces\noindent##2}\par\endgroup}%
  \def\curraddr##1##2{\begingroup
    \@ifnotempty{##2}{\nobreak\indent\curraddrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      ##2\par}\endgroup}%
  \def\email##1##2{\begingroup
    \@ifnotempty{##2}{\nobreak\indent\emailaddrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      \ttfamily##2\par}\endgroup}%
  \def\urladdr##1##2{\begingroup
    \def~{\char`\~}%
    \@ifnotempty{##2}{\nobreak\indent\urladdrname
      \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
      \ttfamily##2\par}\endgroup}%
  \addresses
  \endgroup
}
\makeatother


\address[H. Zhu]{School of Physics and Information Engineering, Jiangsu Second Normal University, 6 Xinhe West Road, Shiqiu street, Nanjing 211200, P. R. China}
\email{\tt zhs@fudan.edu.cn}

\address[H. Song]{Department of Basic Courses, P. R. China}
\email{\tt s3@13.com}


\begin{document}

hello!

Here below is the permission:

\end{document}

这将得到：

BTW, 这无疑是编辑的无理需求...

1 条评论收藏感谢

Edited

BTW, 这无疑是编辑的无理需求...

会员统计