Mathematica logo in LaTeX?

Question

Is there any command for inserting the Mathematica logo, in the same way Matlab's can be inserted with \Matlab?

Answer 1

According to Wikipedia, the Wolfram Mathematica Logo is typeset using the Minion typeface. Hence you need the Minion font to typeset the logo without including an image.

Here is a version for pdflatex

\documentclass{article}
\pagestyle{empty}
\usepackage{graphicx,xcolor}
\definecolor{Mathematica}{HTML}{ed192d}
\font\minionit=MinionPro-It-osf-t1
\font\minionup=MinionPro-Regular-osf-t1
\newcommand\Mathematica{%
    \textcolor{Mathematica}{\minionup Wolfram}
    {\minionit Mathematica}\textsuperscript{\resizebox{!}{0.4ex}{\textregistered}}%
    \resizebox{!}{1.6ex}{\textcolor{Mathematica}{\minionup 9}}%
}
\begin{document}
Foo \Mathematica\ Bar
\end{document}

And here a version for xelatex

\documentclass{article}
\pagestyle{empty}
\usepackage{fontspec,graphicx,xcolor}
\definecolor{Mathematica}{HTML}{ed192d}
\newcommand\Mathematica{{\fontspec[Numbers=OldStyle]{Minion Pro}%
    \textcolor{Mathematica}{Wolfram}
    \textit{Mathematica}\textregistered%
    \resizebox{!}{1.6ex}{\textcolor{Mathematica}{9}}%
}}
\begin{document}
Foo \Mathematica\ Bar
\end{document}

For reference, here a logo from the Wolfram homepgae