discretize_namedIntervals: Convert X to discretized values with elements in the form of...
In peterjuv/myHelpers: Misc helper functions for R

Description Usage Arguments Old implementation

See infotheo::discretize for parameters; defaults are:

1	discretize_namedIntervals(X, ...)

`X`	Numeric vector or list
`disc`	Default "equalfreq"
`nbins`	Default NROW(X)^(1/3)

## Not run: discretize_namedIntervals_vector <- function(X,...) { ## See infotheo::discretize for parameters; defaults are: disc="equalfreq", nbins=sqrt(NROW(x)). ## Returns discretized data in the form of intervals min-max. require(infotheo) d<- infotheo::discretize(X,...)$X m<-tapply(X,d,min) M<-tapply(X,d,max) d_int <- paste0(format(m), "-", format(M)) names(d_int) <- names(m) d_int[m==M] <- format(m)[m==M] #d_int[d] browser() #as.character((sapply(as.character(d), function(cd) {d_int[cd]}))) as.character(d_int[as.character(d)]) } ## End(Not run)

peterjuv/myHelpers documentation built on June 12, 2021, 1:44 p.m.