Displaying 1 result from an estimated 1 matches for "newtck".
Did you mean:
newtcp
2013 Feb 27
1
lattice xyplot point labelling
...#alternative to the use of panel.text
#ltext(x=x, y=y, labels=tv.ms$inq[subscripts], pos=1, cex=0.8)
},
#subscripts=TRUE,
xscale.components = function(...) {
ans <- xscale.components.logpower(...)
range <- ans$num.limit
newtck <- round(seq(range[1],range[2],l=7),1)
ans$bottom$ticks$at <- newtck
ans$bottom$labels$at <- newtck
ans$bottom$labels$labels <-parse(text=paste('10^',newtck,sep=''))
ans
} ,
yscale.components = function(...)...