# Is it possible to export equations from Mathematica to Corel with full Latex quality

I am wondering is there any possible solution to export equations from mathematica to corel x5. I was trying first to export a equations as pdf from mathematica and then to import .pdf to corel, but many characters are missed. Maybe someone had success with this kind of problem. Thanks in advance.

-
Does it work if you use the function in this answer? Just say outlinedExport["output.pdf", g, ImageSize -> 600] or something similar. –  Jens Jun 3 '13 at 3:58

There is a similar problem with Adobe Illustrator, too. For that purpose, I use the following function (see my web site for more info):

toPDF[x_, opts : OptionsPattern[]] :=
If[! ImageQ[x],
First@ImportString[
ExportString[
FilterRules[{opts}, Options[Style]]],
FilterRules[{opts}, ImageSize],
BaseStyle -> {FontFamily -> "Times New Roman",
Background -> (Background /. {opts} /. {Background ->
None})}], "PDF"], "PDF", "TextMode" -> "Outlines"]];
SetAttributes[toPDF, HoldFirst]


Example:

toPDF[Integrate[1 + Sin[x]^2, {x, 0, Pi}], FontSize -> 18]


Now you can either highlight the result (as I did above) and copy it as PDF (on Mac), or type Export["eq.pdf", %] in the next cell, to save to a file.

The reason I added the attribute HoldAll above is that I wanted to be able to export expressions like integrals without having them be evaluated. So the purpose of this function is really geared toward typesetting equations, and then copying them to Illustrator. Maybe this is also what you want for your drawing application.

I use Pane as a wrapper for the equation in order to be able to control the bounding box of the PDF. The function also accepts a Background option in case you want to add a color behind the equation.

-
Thank you very much Jens. This I was trying to get. Quality of image-equation is very nice in corel. Thank you Jens a lot, hope that your "papers" look perfect. –  Pipe Jun 3 '13 at 11:16