Wolfram Function Repository

Instant-use add-on functions for the Wolfram Language

Function Repository Resource:

 CompareFonts

Source Notebook

See the installed fonts on your system

Contributed by: Ed Pegg Jr

ResourceFunction["CompareFonts"][]

list all installed fonts in the style of the font.

ResourceFunction["CompareFonts"]["text"]

shows "text" using all font families.

ResourceFunction["CompareFonts"][text,{font1,font2, font3,...}]

show the String text in a given list of font families fonti.

ResourceFunction["CompareFonts"][text, number]

show a random number of font styles for text.

Details and Options

The system information item $FontFamilies collects the fonts. Your fonts may vary.
Tooltip stacks the font name on top of the stylized name of the font. For example, the legible"Wingdings" is shown over "Wingdings". Tooltip also shows the font family name over a stylized version of the font name.
The number of available font families varies significantly between users.
ResourceFunction["CompareFonts"] supports the option FontSize with a default of 12.

Examples

Basic Examples (3) 

See all the Z's with a Tooltip for each font:

In[1]:=
ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["Z"]
Out[1]=

CompareFonts[] lists all fonts in their font style with a Tooltip for the font name:

In[2]:=
Short[ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"][], 12]
Out[2]=

Admire your pipe collection at a different font size:

In[3]:=
Row[ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["|", FontSize -> 8]]
Out[3]=

This screenshot shows how the font name and stylized font name are stacked in the Tooltip:

Scope (3) 

See a sampling of all the fonts at a larger font size:

In[4]:=
RandomSample[ ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"][FontSize -> 18], 12]
Out[4]=

Get some random fonts:

In[5]:=
randomfonts = RandomSample[$FontFamilies, 15]
Out[5]=

You may specify a custom list of fonts to use for a text string:

In[6]:=
ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["Custom List", randomfonts]
Out[6]=

A font size can be specified:

In[7]:=
ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["Custom List", randomfonts, FontSize -> 8]
Out[7]=

If a font size is given, it may be followed by the size of a random sampling, shown here twice:

In[8]:=
Row[ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["&", 40, FontSize -> 18]]
Out[8]=
In[9]:=
Row[ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["&", 40, FontSize -> 18]]
Out[9]=

Possible Issues (2) 

There are many custom characters in the Wolfram Language:

In[10]:=
WolframLanguageCharacters = {"á", "ā", "ă", "ä", "æ", "à", "â", "\[Aleph]", "\[AliasDelimiter]", "\[AliasIndicator]", "\[Alpha]", "\[AltKey]", "\[And]", "\[Angle]", "\[Angstrom]", "å", "\[AscendingEllipsis]", "ã", "\[Backslash]", "\[BeamedEighthNote]", "\[BeamedSixteenthNote]", "\[Because]", "\[Bet]", "\[Beta]", "˘", "\[Bullet]", "ć", "\[Cap]", "Á", "Ā", "Ă", "Ä", "Æ", "À", "Â", "\[CapitalAlpha]", "Å", "Ã", "\[CapitalBeta]", "Ć", "Ç", "Č", "\[CapitalChi]", "\[CapitalDelta]", "\[CapitalDifferentialD]", "\[CapitalDigamma]", "É", "Ē", "Ĕ", "Ë", "È", "Ê", "\[CapitalEpsilon]", "\[CapitalEta]", "Ð", "\[CapitalGamma]", "Í", "Ĭ", "Ï", "Ì", "Î", "\[CapitalIota]", "\[CapitalKappa]", "\[CapitalKoppa]", "\[CapitalLambda]", "Ł", "\[CapitalMu]", "Ñ", "\[CapitalNu]", "Ó", "Ő", "Ö", "Ò", "Ô", "\[CapitalOmega]", "\[CapitalOmicron]", "Ø", "Õ", "\[CapitalPhi]", "\[CapitalPi]", "\[CapitalPsi]", "\[CapitalRho]", "\[CapitalSampi]", "Š", "\[CapitalSigma]", "\[CapitalStigma]", "\[CapitalTau]", "\[CapitalTheta]", "Þ", "Ú", "Ű", "Ü", "Ù", "Û", "\[CapitalUpsilon]", "\[CapitalXi]", "Ý", "\[CapitalZeta]", "ç", "¸", "¢", "\[CenterDot]", "\[CenterEllipsis]", "č", "\[Checkmark]", "\[Chi]", "\[CircleDot]", "\[CircleMinus]", "\[CirclePlus]", "\[CircleTimes]", "\[ClockwiseContourIntegral]", """, "'", "\[CloverLeaf]", "\[ClubSuit]", "\[Colon]", "\[CommandKey]", "\[Congruent]", "\[Conjugate]", "\[ConjugateTranspose]", "\[ConstantC]", "\[Continuation]", "\[ContourIntegral]", "\[ControlKey]", "\[Coproduct]", "©", "\[CounterClockwiseContourIntegral]", "\[Cross]", "\[Cup]", "\[CupCap]", "\[CurlyCapitalUpsilon]", "\[CurlyEpsilon]", "\[CurlyKappa]", "\[CurlyPhi]", "\[CurlyPi]", "\[CurlyRho]", "\[CurlyTheta]", "¤", "\[Dagger]", "\[Dalet]", "\[Dash]", "°", "\[Del]", "\[DeleteKey]", "\[Delta]", "\[DescendingEllipsis]", "\[Diameter]", "\[Diamond]", "\[DiamondSuit]", "\[DifferentialD]", "\[Digamma]", "/", "\[DotEqual]", "ı", "\[DotlessJ]", "\[DottedSquare]", "\[DoubleContourIntegral]", "\[DoubleDagger]", "\[DoubledGamma]", "\[DoubleDownArrow]", "\[DoubledPi]", "\[DoubleLeftArrow]", "\[DoubleLeftRightArrow]", "\[DoubleLeftTee]", "\[DoubleLongLeftArrow]", "\[DoubleLongLeftRightArrow]", "\[DoubleLongRightArrow]", "\[DoublePrime]", "\[DoubleRightArrow]", "\[DoubleRightTee]", "\[DoubleStruckA]", "\[DoubleStruckB]", "\[DoubleStruckC]", "\[DoubleStruckCapitalA]", "\[DoubleStruckCapitalB]", "\[DoubleStruckCapitalC]", "\[DoubleStruckCapitalD]", "\[DoubleStruckCapitalE]", "\[DoubleStruckCapitalF]", "\[DoubleStruckCapitalG]", "\[DoubleStruckCapitalH]", "\[DoubleStruckCapitalI]", "\[DoubleStruckCapitalJ]", "\[DoubleStruckCapitalK]", "\[DoubleStruckCapitalL]", "\[DoubleStruckCapitalM]", "\[DoubleStruckCapitalN]", "\[DoubleStruckCapitalO]", "\[DoubleStruckCapitalP]", "\[DoubleStruckCapitalQ]", "\[DoubleStruckCapitalR]", "\[DoubleStruckCapitalS]", "\[DoubleStruckCapitalT]", "\[DoubleStruckCapitalU]", "\[DoubleStruckCapitalV]", "\[DoubleStruckCapitalW]", "\[DoubleStruckCapitalX]", "\[DoubleStruckCapitalY]", "\[DoubleStruckCapitalZ]", "\[DoubleStruckD]", "\[DoubleStruckE]", "\[DoubleStruckEight]", "\[DoubleStruckF]", "\[DoubleStruckFive]", "\[DoubleStruckFour]", "\[DoubleStruckG]", "\[DoubleStruckH]", "\[DoubleStruckI]", "\[DoubleStruckJ]", "\[DoubleStruckK]", "\[DoubleStruckL]", "\[DoubleStruckM]", "\[DoubleStruckN]", "\[DoubleStruckNine]", "\[DoubleStruckO]", "\[DoubleStruckOne]", "\[DoubleStruckP]", "\[DoubleStruckQ]", "\[DoubleStruckR]", "\[DoubleStruckS]", "\[DoubleStruckSeven]", "\[DoubleStruckSix]", "\[DoubleStruckT]", "\[DoubleStruckThree]", "\[DoubleStruckTwo]", "\[DoubleStruckU]", "\[DoubleStruckV]", "\[DoubleStruckW]", "\[DoubleStruckX]", "\[DoubleStruckY]", "\[DoubleStruckZ]", "\[DoubleStruckZero]", "\[DoubleUpArrow]", "\[DoubleUpDownArrow]", "\[DoubleVerticalBar]", "\[DownArrow]", "\[DownArrowBar]", "\[DownArrowUpArrow]", "\[DownBreve]", "¡", "\[DownLeftRightVector]", "\[DownLeftTeeVector]", "\[DownLeftVector]", "\[DownLeftVectorBar]", "\[DownPointer]", "¿", "\[DownRightTeeVector]", "\[DownRightVector]", "\[DownRightVectorBar]", "\[DownTee]", "\[DownTeeArrow]", "é", "\[Earth]", "ē", "ĕ", "ë", "è", "ê", "\[EighthNote]", "\[Element]", "\[Ellipsis]", "\[EmptyCircle]", "\[EmptyDiamond]", "\[EmptyDownTriangle]", "\[EmptyRectangle]", "\[EmptySet]", "\[EmptySmallCircle]", "\[EmptySmallSquare]", "\[EmptySquare]", "\[EmptyUpTriangle]", "\[EmptyVerySmallSquare]", "\[EnterKey]", "\[EntityEnd]", "\[EntityStart]", "\[Epsilon]", "==", "\[EqualTilde]", "\[Equilibrium]", "\[ErrorIndicator]", "\[EscapeKey]", "\[Eta]", "ð", "€", "\[Exists]", "E", "\[FiLigature]", "\[FilledCircle]", "\[FilledDiamond]", "\[FilledDownTriangle]", "\[FilledLeftTriangle]", "\[FilledRectangle]", "\[FilledRightTriangle]", "\[FilledSmallCircle]", "\[FilledSmallSquare]", "\[FilledSquare]", "\[FilledUpTriangle]", "\[FilledVerySmallSquare]", "\[FinalSigma]", "\[FirstPage]", "\[FivePointedStar]", "\[Flat]", "\[FlLigature]", "ƒ", "\[ForAll]", "\[FreakedSmiley]", "\[Gamma]", "\[Gimel]", "\[GothicA]", "\[GothicB]", "\[GothicC]", "\[GothicCapitalA]", "\[GothicCapitalB]", "\[GothicCapitalC]", "\[GothicCapitalD]", "\[GothicCapitalE]", "\[GothicCapitalF]", "\[GothicCapitalG]", "\[GothicCapitalH]", "\[GothicCapitalI]", "\[GothicCapitalJ]", "\[GothicCapitalK]", "\[GothicCapitalL]", "\[GothicCapitalM]", "\[GothicCapitalN]", "\[GothicCapitalO]", "\[GothicCapitalP]", "\[GothicCapitalQ]", "\[GothicCapitalR]", "\[GothicCapitalS]", "\[GothicCapitalT]", "\[GothicCapitalU]", "\[GothicCapitalV]", "\[GothicCapitalW]", "\[GothicCapitalX]", "\[GothicCapitalY]", "\[GothicCapitalZ]", "\[GothicD]", "\[GothicE]", "\[GothicEight]", "\[GothicF]", "\[GothicFive]", "\[GothicFour]", "\[GothicG]", "\[GothicH]", "\[GothicI]", "\[GothicJ]", "\[GothicK]", "\[GothicL]", "\[GothicM]", "\[GothicN]", "\[GothicNine]", "\[GothicO]", "\[GothicOne]", "\[GothicP]", "\[GothicQ]", "\[GothicR]", "\[GothicS]", "\[GothicSeven]", "\[GothicSix]", "\[GothicT]", "\[GothicThree]", "\[GothicTwo]", "\[GothicU]", "\[GothicV]", "\[GothicW]", "\[GothicX]", "\[GothicY]", "\[GothicZ]", "\[GothicZero]", "\[GrayCircle]", "\[GraySquare]", ">=", "\[GreaterEqualLess]", "\[GreaterFullEqual]", "\[GreaterGreater]", "\[GreaterLess]", "\[GreaterSlantEqual]", "\[GreaterTilde]", "ˇ", "\[HappySmiley]", "\[HBar]", "\[HeartSuit]", "\[HermitianConjugate]", "\[HorizontalLine]", "\[HumpDownHump]", "\[HumpEqual]", "-", "í", "ĭ", "ï", "ì", "î", "I", "\[ImaginaryJ]", "\[Implies]", "\[Integral]", "\[Intersection]", "\[Iota]", "\[Jupiter]", "\[Kappa]", "\[KernelIcon]", "\[Koppa]", "\[Lambda]", "\[LastPage]", "\[LeftAngleBracket]", "\[LeftArrow]", "\[LeftArrowBar]", "\[LeftArrowRightArrow]", "\[LeftBracketingBar]", "\[LeftCeiling]", "[[", "\[LeftDoubleBracketingBar]", "\[LeftDownTeeVector]", "\[LeftDownVector]", "\[LeftDownVectorBar]", "\[LeftFloor]", "«", "\[LeftModified]", "\[LeftPointer]", "\[LeftRightArrow]", "\[LeftRightVector]", "<<", "\[LeftTee]", "\[LeftTeeArrow]", "\[LeftTeeVector]", "\[LeftTriangle]", "\[LeftTriangleBar]", "\[LeftTriangleEqual]", "\[LeftUpDownVector]", "\[LeftUpTeeVector]", "\[LeftUpVector]", "\[LeftUpVectorBar]", "\[LeftVector]", "\[LeftVectorBar]", "<=", "\[LessEqualGreater]", "\[LessFullEqual]", "\[LessGreater]", "\[LessLess]", "\[LessSlantEqual]", "\[LessTilde]", "\[LetterSpace]", "\[LightBulb]", "\[LongDash]", "==", "\[LongLeftArrow]", "\[LongLeftRightArrow]", "\[LongRightArrow]", "\[LowerLeftArrow]", "\[LowerRightArrow]", "ł", "\[Mars]", "\[MathematicaIcon]", "\[MeasuredAngle]", "\[Mercury]", "\[Mho]", "µ", "\[MinusPlus]", "\[Mu]", "\[Nand]", "\[Natural]", "\[Neptune]", "\[NestedGreaterGreater]", "\[NestedLessLess]", "\[NeutralSmiley]", "\[Nor]", "\[Not]", "\[NotCongruent]", "\[NotCupCap]", "\[NotDoubleVerticalBar]", "\[NotElement]", "!=", "\[NotEqualTilde]", "\[NotExists]", "\[NotGreater]", "\[NotGreaterEqual]", "\[NotGreaterFullEqual]", "\[NotGreaterGreater]", "\[NotGreaterLess]", "\[NotGreaterSlantEqual]", "\[NotGreaterTilde]", "\[NotHumpDownHump]", "\[NotHumpEqual]", "\[NotLeftTriangle]", "\[NotLeftTriangleBar]", "\[NotLeftTriangleEqual]", "\[NotLess]", "\[NotLessEqual]", "\[NotLessFullEqual]", "\[NotLessGreater]", "\[NotLessLess]", "\[NotLessSlantEqual]", "\[NotLessTilde]", "\[NotNestedGreaterGreater]", "\[NotNestedLessLess]", "\[NotPrecedes]", "\[NotPrecedesEqual]", "\[NotPrecedesSlantEqual]", "\[NotPrecedesTilde]", "\[NotReverseElement]", "\[NotRightTriangle]", "\[NotRightTriangleBar]", "\[NotRightTriangleEqual]", "\[NotSquareSubset]", "\[NotSquareSubsetEqual]", "\[NotSquareSuperset]", "\[NotSquareSupersetEqual]", "\[NotSubset]", "\[NotSubsetEqual]", "\[NotSucceeds]", "\[NotSucceedsEqual]", "\[NotSucceedsSlantEqual]", "\[NotSucceedsTilde]", "\[NotSuperset]", "\[NotSupersetEqual]", "\[NotTilde]", "\[NotTildeEqual]", "\[NotTildeFullEqual]", "\[NotTildeTilde]", "\[NotVerticalBar]", "ñ", "\[Nu]", "\[Null]", "\[NumberSign]", "ó", "ő", "ö", "ò", "ô", "\[Omega]", "\[Omicron]", """, "'", "\[OptionKey]", "\[Or]", "ø", "õ", "\[OverBrace]", "\[OverBracket]", "\[OverParenthesis]", "¶", "\[PartialD]", "\[Phi]", "\[Pi]", "\[Piecewise]", "\[Placeholder]", "\[PlusMinus]", "\[Pluto]", "\[Precedes]", "\[PrecedesEqual]", "\[PrecedesSlantEqual]", "\[PrecedesTilde]", "\[Prime]", "\[Product]", "\[Proportion]", "\[Proportional]", "\[Psi]", "\[QuarterNote]", "&", "@", "`", "\\", ":", ",", "-", "$", ".", "=", "!", ">", "{", "[", "(", "<", "#", "%", "+", "?", "'", "}", "]", ")", ";", "/", " ", "*", "~", "_", "|", "^", "®", "\[ReturnIndicator]", "\[ReturnKey]", "\[ReverseDoublePrime]", "\[ReverseElement]", "\[ReverseEquilibrium]", "\[ReversePrime]", "\[ReverseUpEquilibrium]", "\[Rho]", "\[RightAngle]", "\[RightAngleBracket]", "\[RightArrow]", "\[RightArrowBar]", "\[RightArrowLeftArrow]", "\[RightBracketingBar]", "\[RightCeiling]", "]]", "\[RightDoubleBracketingBar]", "\[RightDownTeeVector]", "\[RightDownVector]", "\[RightDownVectorBar]", "\[RightFloor]", "»", "\[RightModified]", "\[RightPointer]", ">>", "\[RightTee]", "\[RightTeeArrow]", "\[RightTeeVector]", "\[RightTriangle]", "\[RightTriangleBar]", "\[RightTriangleEqual]", "\[RightUpDownVector]", "\[RightUpTeeVector]", "\[RightUpVector]", "\[RightUpVectorBar]", "\[RightVector]", "\[RightVectorBar]", "\[RoundImplies]", "\[RoundSpaceIndicator]", "->", ":>", "\[SadSmiley]", "\[Sampi]", "\[Saturn]", "\[ScriptA]", "\[ScriptB]", "\[ScriptC]", "\[ScriptCapitalA]", "\[ScriptCapitalB]", "\[ScriptCapitalC]", "\[ScriptCapitalD]", "\[ScriptCapitalE]", "\[ScriptCapitalF]", "\[ScriptCapitalG]", "\[ScriptCapitalH]", "\[ScriptCapitalI]", "\[ScriptCapitalJ]", "\[ScriptCapitalK]", "\[ScriptCapitalL]", "\[ScriptCapitalM]", "\[ScriptCapitalN]", "\[ScriptCapitalO]", "\[ScriptCapitalP]", "\[ScriptCapitalQ]", "\[ScriptCapitalR]", "\[ScriptCapitalS]", "\[ScriptCapitalT]", "\[ScriptCapitalU]", "\[ScriptCapitalV]", "\[ScriptCapitalW]", "\[ScriptCapitalX]", "\[ScriptCapitalY]", "\[ScriptCapitalZ]", "\[ScriptD]", "\[ScriptDotlessI]", "\[ScriptDotlessJ]", "\[ScriptE]", "\[ScriptEight]", "\[ScriptF]", "\[ScriptFive]", "\[ScriptFour]", "\[ScriptG]", "\[ScriptH]", "\[ScriptI]", "\[ScriptJ]", "\[ScriptK]", "\[ScriptL]", "\[ScriptM]", "\[ScriptN]", "\[ScriptNine]", "\[ScriptO]", "\[ScriptOne]", "\[ScriptP]", "\[ScriptQ]", "\[ScriptR]", "\[ScriptS]", "\[ScriptSeven]", "\[ScriptSix]", "\[ScriptT]", "\[ScriptThree]", "\[ScriptTwo]", "\[ScriptU]", "\[ScriptV]", "\[ScriptW]", "\[ScriptX]", "\[ScriptY]", "\[ScriptZ]", "\[ScriptZero]", "§", "\[SelectionPlaceholder]", "š", "\[Sharp]", "\[ShortLeftArrow]", "\[ShortRightArrow]", "\[Sigma]", "\[SixPointedStar]", "\[SkeletonIndicator]", "\[SmallCircle]", "\[SpaceKey]", "\[SpadeSuit]", "\[SpanFromAbove]", "\[SpanFromBoth]", "\[SpanFromLeft]", "\[SphericalAngle]", "\[Sqrt]", "\[Square]", "\[SquareIntersection]", "\[SquareSubset]", "\[SquareSubsetEqual]", "\[SquareSuperset]", "\[SquareSupersetEqual]", "\[SquareUnion]", "\[Star]", "£", "\[Stigma]", "\[Subset]", "\[SubsetEqual]", "\[Succeeds]", "\[SucceedsEqual]", "\[SucceedsSlantEqual]", "\[SucceedsTilde]", "\[SuchThat]", "\[Sum]", "\[Superset]", "\[SupersetEqual]", "\[SystemEnterKey]", "ß", "\[TabKey]", "\[Tau]", "\[Therefore]", "\[Theta]", "þ", "\[Tilde]", "\[TildeEqual]", "\[TildeFullEqual]", "\[TildeTilde]", "*", "\[Trademark]", "\[Transpose]", "ú", "ű", "ü", "ù", "û", "\[UnderBrace]", "\[UnderBracket]", "\[UnderParenthesis]", "\[Union]", "\[UnionPlus]", "\[UpArrow]", "\[UpArrowBar]", "\[UpArrowDownArrow]", "\[UpDownArrow]", "\[UpEquilibrium]", "\[UpperLeftArrow]", "\[UpperRightArrow]", "\[UpPointer]", "\[Upsilon]", "\[UpTee]", "\[UpTeeArrow]", "\[Uranus]", "\[Vee]", "\[Venus]", "\[VerticalBar]", "\[VerticalEllipsis]", "\[VerticalLine]", "\[VerticalSeparator]", "\[VerticalTilde]", "\[WarningSign]", "\[WatchIcon]", "\[Wedge]", "\[WeierstrassP]", "\[Wolf]", "\[Xi]", "\[Xor]", "ý", "ÿ", "¥", "\[Zeta]", "\[Infinity]"}; randomWL = RandomSample[WolframLanguageCharacters, 20]
Out[11]=

Using random fonts on custom characters might give odd behavior (but seems fine here):

In[12]:=
ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"][StringJoin[randomWL], RandomSample[$FontFamilies, 15]]
Out[12]=

Neat Examples (1) 

Neat examples:

In[13]:=
Row[ResourceFunction[ "CompareFonts", ResourceSystemBase -> "https://www.wolframcloud.com/obj/resourcesystem/api/1.0"]["Neat! ", FontSize -> 10]]
Out[13]=

Requirements

Wolfram Language 14.0 (January 2024) or above

Version History

  • 1.0.0 – 02 May 2025

Related Resources

License Information