An implementation of a simple Scheme in R