x <- c(3,5.5,6,5,10.5,12,11.5,11,20,22.5,21,23.5)
p <- c(30.5,40,30.5,30,35,32.5,33,36,36.5,41,38.5,39)
groups <- c(1,1,1,1,2,2,2,2,3,3,3,3)

# do chi square test

chisq.test(x, p = p, rescale.p = TRUE)` ## I want **include grouping (replicates)** information here.