tests/rep.r

suppressPackageStartupMessages(library(float))

tol = 1e-6

x = matrix(1:6, 3, 2)
s = fl(x)

test = dbl(rep(s, 5))
truth = rep(x, 5)
stopifnot(all.equal(test, truth, tol=tol))

Try the float package in your browser

Any scripts or data that you put into this service are public.

float documentation built on May 29, 2024, 8:13 a.m.