r controller added but not tested