The mean ±1 sd of ln [calcium intake m(mg)] among 30 females, 12 to 14 years of age, below the poverty level is 6.56 ±0.64. Similarly, the mean ±1 sd of ln [calcium intake (mg)] among 40 females, 12 to 14 years of age, above the poverty level is 6.80 ±0.76.Set the significance level α = 0.05a.Test for a significant difference between the variance of the two groupsPossible Answer: Am I doin this correctly in R?s1 = 0.64s2 = 0.76## find test stat – FF_stat = (s1^2) / (s2^2)F_stat## [1] 0.7091413# F_stat = 0.7091413 > 0.5 -> fail to rej# conclude: var equal