Generate the breaks that makes sense for flow data visualization

It is mainly used as helper function to construct breaks function used by 'trans_new'.

flow_breaks(x, n = 6, equal.space = FALSE, trans.fun, inverse.fun)

Arguments

x	the raw data values
n	desired number of breaks (the actual number will be different depending on the data range)
equal.space	whether breaks at equal-spaced intervals
trans.fun	the transform function (only needed when equal.space is TRUE)
inverse.fun	the inverse function (only needed when equal.space is TRUE)

Value

either 10^n intervals or equal-spaced(after transformed) intervals in raw scale.

Examples

library(flowCore)
data(GvHD)
fr <- GvHD[[1]]
data.raw <- exprs(fr)[, "FL1-H"]
flow_breaks(data.raw)
#> [1]  100 1000

trans <- logicleTransform()
inv <- inverseLogicleTransform(trans = trans)
myBrks <- flow_breaks(data.raw, equal.space = TRUE, trans = trans, inv = inv)
round(myBrks)
#> [1]  -111    62   395  2172 13235 82970
#to verify it is equally spaced at transformed scale
print(trans(myBrks))
#> [1] 0.0 0.8 1.6 2.4 3.2 4.0