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

Re: Add Fonts when using Display[]

• To: mathgroup at smc.vnet.net
• Subject: [mg23063] Re: Add Fonts when using Display[]
• From: Andreas Stahel <stahel at math.utah.edu>
• Date: Sat, 15 Apr 2000 03:00:23 -0400 (EDT)
• Organization: Department of Mathematics, University of Utah
• References: <8d3rai$ogc@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

hans.steffani at e-technik.tu-chemnitz.de (Hans Friedrich Steffani) writes:

> I am producing figures with Display[..,..,"PDF"]. After this,
> acroread tells me
> 
> Unable to find or create the font 'Math1Mono'. Some characters may
> not display or print correctly.
> 
> what must I do.
> 
> Producing eps-Files with "EPS" produces similar problems. How can I
> force mathematica to add the needed fonts to the eps-file.
> 

An easy work around is to let Mathematica use standard fonts. The variable
$FormatType does influence the fonts to be used. I have used the code below
to generate EPS graphics files (to be included with LaTeX) with consistent 
success. I do not see a reason for a similar construction for PDF files not 
to work.

CreateEPS[filename_, graphics_] := 
  (tmpFormatType=$FormatType;
   $FormatType = OutputForm ;
Display[StringJoin[filename,".eps"], graphics ,"EPS"];
   $FormatType = tmpFormatType ;
   Null)  


Hope this helps

======================================================================
Andreas Stahel: Andreas.Stahel at hta-bi.bfh.ch