É possível pontilhar seus Is com corações?

Question

Eu queria saber se é possível substituir apenas o modo matemático i da fonte de látex padrão por quase a mesma letra, mas onde o ponto no i é um pequeno coração. Por exemplo:

Obrigado!

Answer 1

Por que não também j?

\documentclass{article}
\usepackage{amsmath}
\usepackage{l3draw}

\makeatletter
\NewDocumentCommand{\iheart}{}{\mathord{\mathpalette\iheart@{\imath{7}{1}}}}
\NewDocumentCommand{\jheart}{}{\mathord{\mathpalette\iheart@{\jmath{12}{2}}}}
\newcommand{\iheart@}[2]{\iheart@@#1#2}
\newcommand{\iheart@@}[4]{%
  \vbox{\m@th\offinterlineskip
    \sbox\z@{$\mkern1mu$}%
    \ialign{##\cr\hidewidth\smallheart@{#1}{#3}\hidewidth\cr\noalign{\kern\wd\z@}\cr$#1#2$\cr}%
  }%
  \mkern#4mu
}

\ExplSyntaxOn
\cs_new_protected:Npn \smallheart@ #1 #2
 {
  \draw_begin:
  \draw_transform_matrix_absolute:nnnn { 0.4 } { 0 } { 0.2 } { 0.3 }
  \draw_path_moveto:n { 0cm, 0cm }
  \hbox_set:Nn \l_tmpa_box { \boldmath$#1\mkern#2mu\heartsuit$ }
  \draw_box_use:N \l_tmpa_box
  \draw_end:
 }
\ExplSyntaxOff
\makeatother

\begin{document}

$2\pi\iheart_{\jheart}+\jheart$

\end{document}

Como funcionam as macros? Primeiro, alguns truques da paleta matemática para ter quatro argumentos:

1. o estilo matemático atual, como sempre
2. a carta a ser composta, então ou \imathe\jmath
3. o kern (matemático) na frente do coração
4. o kern matemático após a combinação, para compensar a protrusão do coração que não é levada em consideração por causa de\hidewidth

Faço um \vboxcom \ialigndentro dele que ultrapassa o coração ao pé da letra.

Finalmente, o coração é um negrito \heartsuitno estilo matemático adequado, sujeito a uma transformação afim que aplica redução e cisalhamento.

Talvez sejam necessários mais alguns experimentos para os vários parâmetros.

Answer 2

\documentclass{article}
\begin{document}
$2\pi{\mathop{{}\imath}\limits^{\scriptscriptstyle\heartsuit}}$
\end{document}

Answer 3

\documentclass{article}
\usepackage{amsmath,graphicx}
\newcommand\iheart[1][\imath]{%
#1\kern-.2em\rlap{%
\raisebox{1.2ex}[0pt][0pt]{%
\rotatebox{-15}{%
\resizebox{.5ex}{.5ex}{\ensuremath{\heartsuit}}}}}\kern.2em} 
\begin{document}
\Huge  \[ 2\pi ii\iheart ii  =  2\pi\iheart[\jmath] \]
\end{document}