DF = data.frame(
    size=as.factor( c( rep( 'Small', 7 ), rep( 'Medsum', 7 ), rep( 'Large', 7 ) ) ),
    asserts=c( 7.2,  6.5, 5.7, 4.4,  3.4,  3.4, 7.8,
              11.3,  5.6, 5.3, 5.3, 10.4,  6.2, 5.3, 
              14.8, 11.3, 9.2, 4.8,  3.9, 10.2, 7.3 )
)