Question

Use R Program to write R codes to compute the standard mean, and (two weighted averages): the linearly weighted mean, and the trapezoidal mean, for the following six test grades and respective weights. What is the standard mean of the data set? Show R codes.

Question4 Write a R codes to compute the standard mean, and (two weighted averages): the linearly weighted mean, and the trapezoidal mean, for the following six test grades and respective weights. Grades: 63, 74,79, 83, 86, 91; (Linear weights: 1, 2, 3, 4,5, 6 and Trapezoidal weights: What is the standard mean of the data set? A 78.7 B 793 С 81.5 D 82.6

Answer 1

Input R code

rm(list=ls())
grade=c(63,74,79,83,86,91)
liner_wt=c(1,2,3,4,5,6)
trap_wt=c(1,2,3,3,2,1)
sum_lwt=0
sum_trap=0
sum_stand=0
for(i in 1:6){
sum_lwt=sum_lwt+liner_wt[i]*grade[i]
liner_mean=sum_lwt/6
sum_trap=sum_trap+trap_wt[i]*grade[i]
trap_mean=sum_trap/6
sum_stand=sum_stand+grade[i]
stand_mean=sum_stand/6
}

OUTPUT-

> sum_lwt
[1] 1756
> liner_mean
[1] 292.6667
> sum_trap
[1] 960
> trap_mean
[1] 160
> sum_stand
[1] 476
> stand_mean
[1] 79.33333

#option-B