Add R wrapper
Redesign example