man-roxygen/binom-ex.R

##' ## which binary numbers (of length 3) have a 1 at the 3rd position
##' out <- contains(3,3)
##' out
##' ## check if true
##' bins <- lapply(out,to.binom,3)
##' bins
##' all(sapply(bins,`[`,3) == 1)
##' sapply(bins,from.binom)
floatofmath/bt88.03.704 documentation built on March 25, 2022, 12:28 p.m.