# How can I type in math calligraphy letters?

I cannot find this kind of letters in the pallete.

math calligraphy?

I can only find this in Mathemtica.

-
In the nomenclature of $\LaTeX$, what you're showing would be called \mathscr or "math script," whereas \mathcal (or "calligraphy") is what Mathematica already has. –  Jens Jul 5 '13 at 6:34

You can do it if your system has a script font available. In my case, I chose for example Bickham Script Pro (from Adobe, I got it with the purchase of some other software). You'll have to look around on your computer or on the web for a matching font. It's not part of the standard installation on my computer, so I can only ask you to find it yourself.

Assuming this step is completed, here is an example:

To enter the script letter in the inline equation, I typed the C and the rest of the equation, then highlighted C and used the menu item Show Fonts to select the script font. I had to adjust the font size to match the surrounding sizes visually, and that's all.

Edit

To address the problem mentioned in Bill's comment, you could use the function toPDF I defined in this answer in order to produce outlined paths from the fonts. Then the result can be exported and read by anyone, no matter whether they have the fonts installed or not. Just use Export["file.pdf", toPDF["..."]] where ... is the text with all necessary fonts as shown above.

-
Beware (or be careful) with adding fonts. As we find out here mathematica.stackexchange.com/questions/20590/… you cannot export these fonts for use by people who don't have them on their computers, though there are some work-arounds. –  bill s Jul 5 '13 at 6:57
@bills See my edit. You can outline the fonts. In CDF, the text can then be used in the form of a (resolution-independent) Graphics object. –  Jens Jul 5 '13 at 7:10

This:

 lst = Cases[
FEEvaluate[FEPrivateGetPopupList["MenuListFonts"]], _Rule];
lst2 = Replace[lst, (x_ -> y_) -> x, 2];
lst3 = Append[
Delete[Select[lst2,
MemberQ[Characters[#], "S"] && MemberQ[Characters[#], "c"] &&
MemberQ[Characters[#], "r"] && MemberQ[Characters[#], "i"] &&
MemberQ[Characters[#], "p"] && MemberQ[Characters[#], "t"] &],
5], "Mathematica5"]


will bring up a list of the script fonts found already on your machine. In my case the result is:

 {"Brush Script MT", "Freestyle Script", "Kunstler Script", "Matura MT \
Script Capitals", "Script", "Vladimir Script", "Mathematica5"}


This:

 Column@Table[
Style["Font Family -> " <> lst3[[i]], 30,
FontFamily -> lst3[[i]]], {i, 1, Length[lst3]}]


will show up examples of these scripts to choose one of your liking.

-