inst/tinytest/test-joinf.R

joinf(
 c(T,F,T,F,F),
 data.frame(
  i=factor(c("a","a","b","b","b")),
  j=rep(17,5)
 )
)->z
expect_equal(z,factor(sprintf("l%d",c(1:4,4))))

Try the praznik package in your browser

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

praznik documentation built on Nov. 11, 2025, 9:06 a.m.