# y values for data set of California oranges:

y.CA <- c(12.6,10.2,9.2,16.4,12.6,12.6,14.3,14.0,10.3,7.7,13.0,9.8,23.6,29.9,20.0,
24.5,30.3,24.1,21.2,18.2,40.7,44.3,41.4,35.3)

# x values for data set of California oranges:

x.CA <- c(0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,2,2,2,2)


# y values for data set of Florida oranges:

y.FL <- c(3.7,3.8,7.1,6.5,8.5,4.0,10.8,5.2,9.7,0.8,10.2,3.0,6.5,20.6,17.2,
12.8,18.5,15.6,17.3,16.9,16.3,18.8,11.0,31.8,28.6,34.4,29.8,24.3,27.4,25.5)

# x values for data set of Florida oranges:

x.FL <- c(0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2)