an R folding bot