modify r string