WOLFRAM

Services & Resources / Wolfram Forums / MathGroup Archive

MathGroup Archive 2005

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

Search the Archive

Re: Re: Re: export import eps | illustrator

Chris Chiasson wrote:

>The syntax was correct, I just forgot to mention that the code exports
>to a directory below the notebook called "Engine Map".
>
>I really need some help from someone that knows how to export EPS from Illustrator and Import to Mathematica
>  
>
Yes....maybe, but first you need to find someone who can help you to 
export  from Mathematica to EPS.
The correct syntax for exporting  graphics, in my humble opinion is

Export["filename.format", plot, "EPS"]

I think you are missing the EPS in your initial Export command, may be 
that is why you get this behaviour

>The result of these commands is a Graphics object that has misaligned
>text on the axes, but is otherwise acceptable.
>  
>


Best Regards

Pratik

>On 8/13/05, Pratik Desai <pdesai1 at umbc.edu> wrote:
>  
>
>>Chris Chiasson wrote:
>>
>>    
>>
>>>>I usually get this error when I try to export a graphic and it is not
>>>>defined
>>>>
>>>>
>>>>        
>>>>
>>>I have not made this error. Note the Plot statement is inside the
>>>Export statement. Thank you for your response.
>>>
>>>On 8/13/05, Pratik Desai <pdesai1 at umbc.edu> wrote:
>>>
>>>
>>>      
>>>
>>>>Chris Chiasson wrote:
>>>>
>>>>
>>>>
>>>>        
>>>>
>>>>>Hello MathGroup,
>>>>>I am trying to Import some 2D vector graphics from a PDF. I have taken
>>>>>the graphics and put them in an Adobe Illustrator file. I have tried
>>>>>all manner of export methods.
>>>>>
>>>>>PS
>>>>>EPS
>>>>>DXF
>>>>>SVG
>>>>>
>>>>>In all cases Mathematica either can't read the files or reads them
>>>>>incorrectly in a way that makes it impossible to obtain the data I
>>>>>need. Also, using ghostview/pstoedit on the ps and eps output of
>>>>>Illustrator has been ineffective.
>>>>>
>>>>>So, I decided I would start small:
>>>>>
>>>>>NotebookDirectory=
>>>>>  DirectoryName[
>>>>>    ToFileName["FileName"/.NotebookInformation[EvaluationNotebook[]]]];
>>>>>Export[ToFileName[NotebookDirectory,"\\Engine Map\\temp2.eps"],
>>>>>Plot[x^2,{x,0,3},Epilog->{Hue[0],Line[{{1,0},{1,9}}]},ImageSize->600]]
>>>>>Show@Import[ToFileName[NotebookDirectory, "\\Engine Map\\temp2.eps"]]
>>>>>
>>>>>The result of these commands is a Graphics object that has misaligned
>>>>>text on the axes, but is otherwise acceptable.
>>>>>
>>>>>Now:
>>>>>I open Illustrator, open the temp2.eps file, save it as an eps
>>>>>(varying the version of the EPS has had no effect), close Illustrator
>>>>>and then issue the following command again:
>>>>>
>>>>>Show@Import[ToFileName[NotebookDirectory, "\\Engine Map\\temp2.eps"]]
>>>>>
>>>>>The output is now:
>>>>>DeleteFile::privv: Privilege violation during DeleteFile[C:\DOCUME~
>>>>>        1\Chris\LOCALS~1\Temp\.00009a03480].
>>>>>Import::fmterr: Invalid EPS format.
>>>>>Show::gtype: Symbol is not a type of graphics.
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>          
>>>>>
>>>>I usually get this error when I try to export a graphic and it is not
>>>>defined
>>>>lets say
>>>>plot1=Plot[..........]
>>>>SetDirectory["C://"]
>>>>Export["plot1.png", plot, "PNG"]
>>>>when plot and plot1 do not match it gives you the gtype error
>>>>
>>>>I hope this helps
>>>>
>>>>Pratik Desai
>>>>
>>>>
>>>>
>>>>        
>>>>
>>>>>Show[$Failed]
>>>>>
>>>>>What is going on? How do I fix this problem? If I can import this
>>>>>basic graphic with your help, I may be able to tackle the other one.
>>>>>
>>>>>Versions:
>>>>>Win XP SP2
>>>>>Mathematica 5.2 Student
>>>>>Adobe Illustrator CS 2 Tryout
>>>>>
>>>>>
>>>>>
>>>>>
>>>>>          
>>>>>
>>>>--
>>>>Pratik Desai
>>>>Graduate Student
>>>>UMBC
>>>>Department of Mechanical Engineering
>>>>Phone: 410 455 8134
>>>>
>>>>
>>>>
>>>>
>>>>
>>>>        
>>>>
>>>
>>>
>>>      
>>>
>>Well this worked on my ver 5.1.1 Windows XP
>>NotebookDirectory =
>>    DirectoryName[
>>      ToFileName["FileName" /. NotebookInformation[EvaluationNotebook[]]]];
>>Export[ToFileName[NotebookDirectory, "\\temp2.eps"],
>>  Plot[x^2, {x, 0, 3}, Epilog -> {Hue[0], Line[{{1, 0}, {1, 9}}]},
>>ImageSize \
>>-> 600], "EPS"]
>>Show@Import[ToFileName[NotebookDirectory, "\\temp2.eps"]]
>>
>>what I meant earlier in my email was that the Export in your code was
>>not in the correct syntax
>>
>>Anyway hope this helps
>>
>>Pratik Desai
>>
>>--
>>Pratik Desai
>>Graduate Student
>>UMBC
>>Department of Mechanical Engineering
>>Phone: 410 455 8134
>>
>>
>>
>>    
>>
>
>
>  
>


-- 
Pratik Desai
Graduate Student
UMBC
Department of Mechanical Engineering
Phone: 410 455 8134
  • Prev by Date: Re: Broken DSolve + Piecewise forcing function
  • Next by Date: Re: Broken DSolve + Piecewise forcing function
  • Previous by thread: Re: Re: export import eps | illustrator | pstoedit
  • Next by thread: Re: Re: Re: Re: export import eps | illustrator