MathGroup Archive 1992

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: No Subject

  • To: mathgroup at (Mathematica Discussion Group)
  • Subject: Re: No Subject
  • From: Ross_Moore at (Ross Moore)
  • Date: Mon, 24 Aug 1992 21:07:48 +1000

        Reply to:   RE>No Subject
The command you want is FontForm .
The bible reference is pp 467-468  (Version 2 ; version 1 is different)

However you cannot get different fonts in the same text string.
You can get over this by specifying the character string in one font, then
doing some clever duplicating and editing of the resulting postscript code.

( On the Mac this is easy; presumably the Windows Front-End is similar.
Certainly it helps to know a bit about the PostScript language, but really
all you need to do is ...  )

The basic idea is to overlay 2 character strings, one set in each font.
Printing characters in one string should match spaces in the other.

Here is the recipe ...

1.  Locate the string  (2nd occurrence, if it appears twice)
2. Duplicate it and the surrounding group of lines:   gsave ......  grestore
3. Change the fonts in either group.
4. replace the unwanted characters in each string by spaces.

Re-render the PostScript and...   bingo!!,  two fonts in the place of one.



Spaces are not always of fixed width.  You may have to do some trial and
error insertion/deletion of spaces to get it looking right.

For finer adjustments, tweak the numbers preceding the strings.
Notice how these numbers govern the position of the text box. 

What prints may not be the same as what shows on-screen.
There is certainly a bug in the Mac Front-End here. I have had no experience
of other Front-Ends, so cannot comment about them.

You may have to specify octal character codes for non-keyboard characters.
(This is a PostScript feature, not Mma.)


Once you get some experience with this technique, and appreciate what the
numbers mean for positioning the text-boxes, you can directly construct by
hand your own text boxes for plot/axes-labels with multiple fonts -- without
further recourse to a Mathematica kernel.

Mind you, getting everything in exactly the right place is rather tedious. 

  • Prev by Date: Video your output
  • Next by Date: D[myFunc[g[x]]] -> myFunc[D[g[x],x]: How to do in chain rule ???
  • Previous by thread: Video your output
  • Next by thread: D[myFunc[g[x]]] -> myFunc[D[g[x],x]: How to do in chain rule ???