Added 17 R solution