Respuesta1
Aquí hay una versión ligeramente diferente: aplico el acortamiento en ambos lados, para lograr simetría.
El acortamiento depende del valor dado al parámetro \uHomskip
.
\documentclass{article}
\usepackage{amsmath}
\newmuskip\uHomskip
\DeclareMathOperator{\uHom}{%
\mkern\uHomskip
\underline{\mkern-\uHomskip Hom\mkern-\uHomskip}
\mkern\uHomskip
}
\begin{document}
\newcommand{\test}[1]{%
\begingroup\uHomskip=#1mu\relax
\makebox[2em][l]{#1:}$\uHom_R$
\endgroup\par
}
\test{0} \test{0.5} \test{1} \test{1.5} \test{2}
\end{document}
Cuando decidas la cantidad que deseas, simplemente configúrala en el preámbulo, por ejemplo
\newmuskip\uHomskip \setlength{\uHomskip}{1.5mu}
\DeclareMathOperator{\uHom}{%
\mkern\uHomskip
\underline{\mkern-\uHomskip Hom\mkern-\uHomskip}
\mkern\uHomskip
}
La ventaja de utilizar mu
unidades es que se escalan automáticamente en subíndices/superíndices.
Si no desea la manteca a la izquierda, simplemente elimine los núcleos correspondientes:
\newmuskip\uHomskip \setlength{\uHomskip}{1.5mu}
\DeclareMathOperator{\uHom}{%
\underline{Hom\mkern-\uHomskip}
\mkern\uHomskip
}