Cleaned Rfunctions