Following code from frame tick label, with a slight modification in the FrameTicks->{{}{}}
:
yticks = Charting`ScaledTicks[{Identity, Identity}, "TicksLength" -> {.03, .02}][##, {3, 10}] &;
xticks = Charting`ScaledTicks[{Identity, Identity}, "TicksLength" -> {.03, .02}][##, {6, 5}] &;
Plot[Sin[x], {x, -2.5, 2.5}, Frame -> True, Axes -> False, FrameTicks -> {{yticks, yticks}, {xticks, xticks}}]
The issue is that I get the same graph as obtained in the above link, but I also get the frame labels from -1 to 1 on the right y-axis and -2 to 2 on the upper x-axis. What I want is to get exactly the same tick markers as on the left y-axis and horizontal down x-axis, on right and top, but without numbers on them. In other words, how to get the same tick marks on all axis and only two axes numbered. Any suggestions on this, please?
Edited I am trying the above code with a log-log scale and it fails to work. Could it be checked, please? Thanks!
FrameTicks -> {{yticks, Automatic}, {xticks, Automatic}}
? $\endgroup${a_?NumericQ, _, b___} :> {a, "", b}
(c.f. the end of kglr's answer in the linked post ) So for exampleyticksBare = Charting`ScaledTicks[{Identity, Identity}, "TicksLength" -> {.03, .02}][##, {3, 10}] /. {a_?NumericQ, _, b___} :> {a, "", b}&
$\endgroup$