use of lattice instead of base in the last plot