# Why the exported result is different from the evaluated result

Why the exported result is different from the evaluated result? How to set to make them the same!

Here’s the code, It needs the package MaTeX. It’s Ok, If you don’t use this package, just make sure the text remain the same size when evaluating and exporting.

``\[Gamma] = 7/18 \[Pi]; a1 = Graphics3D[{Opacity[0.4], LightBlue, Sphere[], Opacity[1], Black,      Thick, Line[{{-1, 0, 0}, {1, 0, 0}}],      Line[{{0, 1, 0}, {0, -1, 0}}], Line[{{0, 0, -1}, {0, 0, 1}}]}]; a2 = ParametricPlot3D[{Cos[t], Sin[t], 0}, {t, 0, 2 \[Pi]},     PlotStyle -> {Black, Dashed}]; a3 = ParametricPlot3D[{0, Cos[t], Sin[t]}, {t, -\[Pi]/2, \[Pi]/2},     PlotStyle -> {Black, Dashed}]; a4 = ParametricPlot3D[{Cos[t], 0, Sin[t]}, {t, -\[Pi], \[Pi]},     PlotStyle -> {Black, Dashed}]; data = Table[{0, Cos[t], Sin[t]}, {t, 3 \[Pi]/2, 5 \[Pi]/4, -0.01}]; a5 = Graphics3D[{Green, Arrowheads[0.035], Arrow[Tube[data, 0.01]]}]; data = Table[{0, Cos[t], Sin[t]}, {t, \[Pi], 1.5 \[Pi]/2, -0.01}]; a6 = Graphics3D[{Green, Arrowheads[0.035], Arrow[Tube[data, 0.01]]}]; data = Table[{0, Cos[t], Sin[t]}, {t, \[Pi]/2, 3 \[Pi]/2, 0.01}]; a7 = Graphics3D[{Green, Tube[data, 0.01]}]; a8 = Graphics3D[{Green, Sphere[{0, -1, 0}, 0.05]}]; a9 = Show[{a1, a2, a3, a4, a5, a6, a7, a8}, BoxStyle -> Opacity[0],     ViewPoint -> {\[Pi], -1.4 \[Pi], \[Pi]/1.5}]; data = Table[{-Cos[t] Sin[\[Gamma]], Cos[t] Cos[\[Gamma]],      Sin[t]}, {t, (1.5 \[Pi])/2, (1.75 \[Pi])/2, 0.01}]; b1 = Graphics3D[{Green, Arrowheads[0.035], Arrow[Tube[data, 0.01]]}]; data = Table[{-Cos[t] Sin[\[Gamma]], Cos[t] Cos[\[Gamma]],     Sin[t]}, {t, (2 \[Pi])/2, (2.25 \[Pi])/2, 0.01}]; b2 =   Graphics3D[{Green, Arrowheads[0.035],     Arrow[Tube[data, 0.01]]}]; data =   Table[{-Cos[t] Sin[\[Gamma]], Cos[t] Cos[\[Gamma]],     Sin[t]}, {t, \[Pi]/2, (3 \[Pi])/2, 0.01}]; b3 =   Graphics3D[{Green, Tube[data, 0.01]}]; data = Table[{0.2 Sin[t], -0.2 Cos[t], 0}, {t, 0, \[Gamma],     0.01}]; b4 =   Graphics3D[{Red, Arrowheads[0.015], Arrow[Tube[data, 0.008]]}]; b5 =   Graphics3D[{Red,     Tube[{{0, 0, 0}, {Sin[\[Gamma]], -Cos[\[Gamma]], 0}}, 0.008]}]; b6 = Rasterize[   Show[{a9, b1, b2, b3, b4, b5}, ImageSize -> {1000, 1000}],    RasterSize -> 3000]  c1 = Graphics[    Text[MaTeX[      TeXForm[StringTemplate["\[Gamma] = ``\[Degree]"][        Floor[\[Gamma] 180/\[Pi]]]], FontSize -> 30], {0, -0.1}]]; c2 = Canvas[c1, FrameStyle -> False, PlotRange -> {{-1, 1}, {-1, 1}},    Background -> b6, ImageSize -> {1000, 1000}] Export["带闭合路径的庞加莱球   " <>     DateString[{"(Date ", "ISODate", " Time ", "Hour", "-", "Minute",       "-", "Second", ")"}] <> ".pdf", c2] // SystemOpen $$````$$ ``