inst/examples/ex2.R

In wwbrannon/schemeR: Ports of Lisp/Scheme Features to R

x <- sort(sample(1:10, 5, replace = TRUE))
for (i in x)
    R(
        .(print, .(`:`, 1, i))
    )

#Equivalent:
schemeR::schemeR({
    .(`<-`, x, .(sort, .(sample, .(`:`, 1, 10), 5, replace=TRUE)))
    .(`for`, i, x, .(print, .(`:`, 1, i)))
})