--- a/r.rst	Sat Mar 05 22:50:41 2016 +0200
+++ b/r.rst	Sat Mar 05 22:51:01 2016 +0200
@@ -201,3 +201,5 @@
   names(d)[names(d)=="beta"] <- "two"
   names(d)[2] <- "two"
 
+  library(plyr)
+  rename(d, c("beta"="two", "gamma"="three"))