Sphericity with unequal sample sizes


I want to do a repeated measures anova in R on a data set consisting of four treatments on subjects, over 4 weeks.
However, in week 3 I am missing data from a third of the subjects.
Does anyone know how I can test for sphericity in R with these missing data points?

Many thanks in advance !