Add R sample app