Hi Gareth,
If I understand your question correctly, here a few options:
Example 1:
Plot[x^2/5, {x, 0, 10},
Ticks -> {{{2, , .1}, {4, , .2}, {6, "A", .25}, {8, , .15}, {10,
2 , .5}}, Automatic}
, TicksStyle -> Directive[Red, Thick]
, ImageSize -> Small]
Example 2:
ticksv[min_, max_] :=
Table[{i, Style[i, 12], {.08, 0}, Thick}, {i, 0, max, 0.2}]
ticksh[min_, max_] :=
Table[{i, Style[i, 12], {.08, 0}, Directive[Red, Thick]}, {i, 0.5,
max, 0.5}]
LogPlot[Exp[-t], {t, 0.0, 2.0}, Ticks -> {ticksh, ticksv}
, ImageSize -> Small]
Example 3:
Manipulate[
Plot[Cos[x], {x, 0, 10}, Frame -> True,
FrameTicks -> {{{0, 0 \[Degree], {a, b}}, {Pi,
180 \[Degree], {a, b}}, {2 Pi, 360 \[Degree], {a, b}}, {3 Pi,
540 \[Degree], {a, b}}}, {-1/2, 1/2}}], {a, -0.05,
0.05}, {b, -0.05, 0.05}, SaveDefinitions -> True]
Example 4:
dates = DateList[{2002, 1, 2 #}] & /@ Range@600;
values = Accumulate@RandomReal[{-1, 1}, 600];
DateListPlot[Transpose@{dates, values}, Joined -> True,
FrameTicks -> {{{#, #, {0, 0.10}} & /@ Range[-30, 30, 2],
None}, {Automatic, None}}]
Good luck and regards,.....Jos