Chi square

Chi-square: Checking for independence between 2 categorical variable, by using formula: x^2 = (sum(O-E)^2)/E, and df => value of p

Input data

library(readxl)

## Warning: package 'readxl' was built under R version 4.0.3

Data <- read_excel("C:/Users/Admin/Desktop/R/Data.xlsx", 
     sheet = "Chi square", col_types = c("skip", 
         "numeric", "numeric", "numeric"))
View(Data)

Run Chi square

chisq.test(Data)

## 
##  Pearson's Chi-squared test
## 
## data:  Data
## X-squared = 178.16, df = 6, p-value < 2.2e-16

Conclusion: There have a relationship between Treatment (1,2,3,4) and Feeding level (Low, Medium, High)