Make the axes on my graph look darker on paper?

So, since Mathematica 10, the axes on my plot are so thin that I have difficulties to see it.

How can I make the axes more darker?

Than you

Few options:

  1. Use AxesStyle -> Opacity[1] or similar
  2. Also you can magnify PlotTheme -> "Marketing" or similar
  3. Use Magnify - see belwo

Code to demo point 3):

Manipulate[
 Magnify[
  Plot[Evaluate[Table[BesselJ[n, x], {n, 4}]], {x, 0, 10},
   Filling -> Axis,
   AxesStyle -> Opacity[1],
   ImageSize -> size/mag]
  , mag]
 , {{mag, 1}, .8, 3}
 , {{size, 600}, 300, 800}]

asd2343tqefasc3sdfa34.gif

Thank you very much!
This is what I want…
Marcel