Prev: CONDITION/DATA ANALYSIS/PLOTS
Next: Using tilde in symbol name
From: divisor on 27 Feb 2010 03:13
Hello mathGroup:

These 3 commands are taken directly from the help page for Zernike[].

r2c[e_] :=
Simplify[TrigExpand[e] /. {Sin[\[Theta]] :> y/r,
Cos[\[Theta]] :> x/r} /. r^n_ :> (x^2 + y^2)^(n/2)]

zPlot[e_] :=
With[{f = r2c[e]},
DensityPlot[Cos[2 Pi f]^2, {x, -1, 1}, {y, -1, 1},
RegionFunction :> (#1^2 + #2^2 <= 1 &), PlotPoints -> 25,
BoundaryStyle -> Black, Frame -> False]]

zPlot[ZernikeR[2, 2, r] Cos[2 \[Theta]] +
2 ZernikeR[3, 1, r] Sin[\[Theta]]]

The final one produces a graphic which (I guess) is slightly
complicated. I have some other constructions using this special
function to work on so I thought it should not have any trouble
printing this. My Mathematica V7 machine cannot print right now (due to
network disruptions), so I have been using SaveAs[] with PDF and
transferring it to a machine which can print in my network. It would
not and here are the results:

- Mathematica is 7.0 for Microsoft Windows (32-bit) (February 18, 2009); XP
SP2
- Help About says 7.0.1.0
- printing PDF thru the network gets a "can't print error" (Win7 -->
Win7)
- downloading directly to print server and trying to print PDF hangs
the machine (win7)

I already know there are several issues with print-to-PDF and SaveAS[]
PDF (I have reported some) so I am just letting people know about this
problem. When I export the graphic as JPEG alone, it prints OK.

Here is some more info:

- NB file with just commands 4.5K
- evaluated NB file 815K
- PDF file 7M
- exported graphic alone 25K

I hope WRI can get to the bottom of these issues going forward. I am
never trying to test these cases. I only learned about this Zernike[]
function this week.

Regards..

Roger Williams
Franklin Laboratory

From: David Bailey on 15 Mar 2010 01:07
divisor wrote:
> Hello mathGroup:
>
> These 3 commands are taken directly from the help page for Zernike[].
>
> r2c[e_] :=
> Simplify[TrigExpand[e] /. {Sin[\[Theta]] :> y/r,
> Cos[\[Theta]] :> x/r} /. r^n_ :> (x^2 + y^2)^(n/2)]
>
> zPlot[e_] :=
> With[{f = r2c[e]},
> DensityPlot[Cos[2 Pi f]^2, {x, -1, 1}, {y, -1, 1},
> RegionFunction :> (#1^2 + #2^2 <= 1 &), PlotPoints -> 25,
> BoundaryStyle -> Black, Frame -> False]]
>
> zPlot[ZernikeR[2, 2, r] Cos[2 \[Theta]] +
> 2 ZernikeR[3, 1, r] Sin[\[Theta]]]
>
> The final one produces a graphic which (I guess) is slightly
> complicated. I have some other constructions using this special
> function to work on so I thought it should not have any trouble
> printing this. My Mathematica V7 machine cannot print right now (due to
> network disruptions), so I have been using SaveAs[] with PDF and
> transferring it to a machine which can print in my network. It would
> not and here are the results:
>
> - Mathematica is 7.0 for Microsoft Windows (32-bit) (February 18, 2009); XP
> SP2
> - Help About says 7.0.1.0
> - printing PDF thru the network gets a "can't print error" (Win7 -->
> Win7)
> - downloading directly to print server and trying to print PDF hangs
> the machine (win7)
>
> I already know there are several issues with print-to-PDF and SaveAS[]
> PDF (I have reported some) so I am just letting people know about this
> problem. When I export the graphic as JPEG alone, it prints OK.
>
> Here is some more info:
>
> - NB file with just commands 4.5K
> - evaluated NB file 815K
> - PDF file 7M
> - exported graphic alone 25K
>
> I hope WRI can get to the bottom of these issues going forward. I am
> never trying to test these cases. I only learned about this Zernike[]
> function this week.
>
> Regards..
>
> Roger Williams
> Franklin Laboratory
>
Another way to create a PDF is using the free software PrimoPDF. This is
quite neat because it pretends to a be printer, but when you print to it
- say by printing a Mathematica notebook - it creates a PDF file.

David Bailey
http://www.dbaileyconsultancy.co.uk

From: divisor on 15 Mar 2010 06:03
Thanks for this reply David...

I ended up using the Distiller in the Acrobat Professional product and
Print-Selection from inside Mathematica. This cleared my most pressing recent
problem.

FYI: Amazingly even this did not help the rendering of a notebook with
lots of Pie Charts in a video I made. So WRI definitely needs to find
someone who can work on the printing interface to PDF (assuming this
is their problem). I have reported this to the support group.

Roger Williams
Franklin Laboratory
http://www.youtube.com/CongruentLight

On Mar 14, 10:07 pm, David Bailey <d...(a)removedbailey.co.uk> wrote:

>
> Another way to create a PDF is using the free software PrimoPDF. This is
> quite neat because it pretends to a be printer, but when you print to it
> - say by printing a Mathematica notebook - it creates a PDF file.
>
> David Baileyhttp://www.dbaileyconsultancy.co.uk- Hide quoted text -
>
> - Show quoted text -


 | 
Pages: 1
Prev: CONDITION/DATA ANALYSIS/PLOTS
Next: Using tilde in symbol name