Determine The Average R