How to make this curly 'R' (ℛ)?

Question

Which package has a similar looking fancy R or does anyone know how to make one? (Note: the line underneath the R is just the notebook paper... this is from a scanned set of notes).

Answer 1

My answer is by using tikz (but with simple lines and not fill to add effect of width):

\documentclass{article}
\usepackage{amsmath,amsfonts}
\usepackage{tikz}
\usetikzlibrary{}
\newcommand{\fancyR}{\sbox1{\vbox{R}}\sbox2{\hbox{R}}\tikz[inner sep=0pt,outer sep=0pt]{\coordinate (A);\draw[-,black,line width=0.55pt,scale=0.75]([shift={({\the\wd2/2},0)}]A) to[out=180,in=0] ++(-{\the\wd2/2},{3*(\the\ht1+\the\dp1)/5)}) to[in=90,out=180]++({-\the\wd2/5},{-(\the\ht1+\the\dp1)/8})
to[in=270,out=270]++({\the\wd2/2},{7*(\the\ht1+\the\dp1)/12})
to[in=0,out=90]++(-{7*\the\wd2/20},{3*(\the\ht1+\the\dp1)/12})
to[in=90,out=180]++(-{13*\the\wd2/24},-{11*(\the\ht1+\the\dp1)/12})
to[in=180,out=270]++({3*\the\wd2/12},{-4*(\the\ht1+\the\dp1)/10})
to[in=270,out=0]++({11*\the\wd2/48},{(\the\ht1+\the\dp1)/3})
to[in=300,out=90]++(-{3*\the\wd2/13},{11*(\the\ht1+\the\dp1)/12})
to[in=40,out=120]++(-{6*\the\wd2/10},-{1*(\the\ht1+\the\dp1)/6});
}}
\begin{document}
$\mathbb{R}$R\fancyR{}$R$
\end{document}

Output:

Answer 2

In the modern toolchain with unicode-math, you can set any TrueType or OpenType font as your script alphabet (or calligraphic, or a new alphabet). For this example, I downloaded the OTF version of Odelette by Adi Marwah into a subdirectory of my project folder named fonts.

\documentclass[varwidth]{standalone}
\usepackage{unicode-math}

\defaultfontfeatures{Scale = MatchUppercase}
\setmathfont{Latin Modern Math}
\setmathfont[Path = ./fonts/, range = scr]{Odelette.otf}

\begin{document}
\[ \mathscr{R} \subset \mathscr{T} \]
\end{document}

Answer 3

Here are two fancy R options:

You can consult Table 307: Math Alphabets on page 119 of the comprehensive list for other options.

Answer 4

If you could obtain a higher-res image of it, or better still an image in vector format, then this approach would work for most situations. However, it is impervious to things like \textit, \textcolor, etc.

\documentclass{article}
\usepackage{scalerel}
\newcommand\fancyR{\scalerel*{\includegraphics{fancyR}}{R}}
\begin{document}

$ab\fancyR c \scriptscriptstyle ab\fancyR c$

$ y = x^{\fancyR}$

$ab\fancyR c \quad\scriptscriptstyle ab\fancyR c$

$x_{\fancyR} = 0$
\end{document}

Answer 5

I prefer this from (mt2pro) (the image is taken from this link https://www.pctex.com/mtpro2.html):

\documentclass[12pt]{book}
\usepackage[mtpccal]{mtpro2}
\begin{document}
\[
\mathcal{R}
\]
\end{document}

If you prefer there is also this font TeX Gyre Pagella Math for the character bit curly R.

\documentclass{article}
\usepackage{unicode-math}
\newcommand{\nR}{\mathversion{Pagella} $\mathscr{R}$}
\setmathfont[version=Pagella]{TeX Gyre Pagella Math}

\begin{document}
\nR
\end{document}