DF = data.frame( developer=as.factor( c( rep( 'A', 6 ), rep( 'B', 6 ) ) ), flaws=c( 1, 4, 5, 6, 3, 7, 8, 6, 4, 9, 11, 10 ) )