Re: Drawing tick labels without ticks

*To*: mathgroup at smc.vnet.net*Subject*: [mg80598] Re: Drawing tick labels without ticks*From*: "David Park" <djmpark at comcast.net>*Date*: Sun, 26 Aug 2007 23:09:36 -0400 (EDT)*References*: <far9qs$4bp$1@smc.vnet.net>

Two suggestions: This gives you zero length tick marks, but there is a residual dot. xyticks = Table[{x, x, {0, 0}}, {x, 1, 5}]; ListPlot[{1, 2, 3, 4, 5}, AxesStyle -> Opacity[0], TicksStyle -> Opacity[1], Ticks -> {xyticks, xyticks}, PlotRange -> {{0, 5.1}, {0, 5.1}}] The following gets rid of all ticks and axes and just adds labels where you want them. Graphics[ {Point /@ Table[{x, x}, {x, 1, 5}], Table[Text[x, {x, 0.8}], {x, 1, 5}], Table[Text[x, {0.8, x}], {x, 1, 5}]}] -- David Park djmpark at comcast.net http://home.comcast.net/~djmpark/ "D. Grady" <D.C.Grady at gmail.com> wrote in message news:far9qs$4bp$1 at smc.vnet.net... > Can anyone suggest a simple method for keeping tick labels in a graph > without also drawing axes or the ticks themselves? As an example, > > ListPlot[{1, 2, 3, 4, 5}, AxesStyle -> Opacity[0], TicksStyle -> > Opacity[1]] > > comes close to what I'm after, but doesn't quite get there. I'd like > for nothing to appear in the plot except the data points and the tick > labels. > > There doesn't seem to be a way to target specifically the tick labels > without also afftecting the tick marks or the axes. LabelStyle will > target tick labels, but it has a lower precedence than both AxesStyle > and TickStyle, so if I use either of those options to turn off the > axes and ticks, it will also turn off labels. > > It's my hope that there is a simple solution that I'm overlooking. If > the only way around this is to go through a complicated process of > extracting tick labels from a dummy graphic and then pasting them in > to the actual graphic, I may as well use a different program. Thanks > for your help! > >