Problem with supplying custom tick marks
- To: mathgroup at smc.vnet.net
- Subject: [mg82714] Problem with supplying custom tick marks
- From: "David Park" <djmpark at comcast.net>
- Date: Tue, 30 Oct 2007 03:15:17 -0500 (EST)
Here are a set of tick specifications for an x axis: xticks = {{0, 0, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {2, 2, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {4, 4, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {6, 6, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {8, 8, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {10, 10, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {12, 12, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {14, 14, {0.00625`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.25`]}}, {1/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {1, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {3/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {5/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {3, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {7/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {9/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {5, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {11/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {13/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {7, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {15/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {17/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {9, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {19/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {21/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {11, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {23/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {25/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {13, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {27/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}, {29/2, "", {0.00375`, 0}, {GrayLevel[0.`], AbsoluteThickness[0.125`]}}}; Here is a plot with Automatic x-axis ticks. plot1 = Plot[5 Sin[x], {x, 0, 15}, Frame -> True, FrameTicks -> {Automatic, Automatic, None, None}] Here is the same plot with the xticks defined above. plot2 = Plot[5 Sin[x], {x, 0, 15}, Frame -> True, FrameTicks -> {xticks, Automatic, None, None}] What bothers me is that the x-ticks are so much shorter in the second plot (at least they distinctly look that way to me) even though they are exactly the same ticks. xticks == Part[AbsoluteOptions[plot1, FrameTicks], 1, 2, 1] == Part[AbsoluteOptions[plot2, FrameTicks], 1, 2, 1] True I find this quite irritating and something that seems to be beyond the user's control. One can make the ticks look better by making them 2 or 3 times as large. However, the same tick specifications should result in the same ticks. -- David Park djmpark at comcast.net http://home.comcast.net/~djmpark/