if(require(flowFitExampleData)){
# using flowViz
# load data
data(PKH26data)
# plot data
plot(PKH26data[[1]], "FL2-Height LOG", axes=FALSE, breaks=1024)
# create ticks
my.ticks <- logTicks(1024,4)
# plot your ticks
axis(1,my.ticks$all,label=FALSE)
axis(1,at=my.ticks$major,labels=my.ticks$labels)
axis(2)
}
Run the code above in your browser using DataLab