DF = data.frame( year=c( rep( 1669, 3 ), rep( 1780, 3 ), rep( 1865, 3 ) ), value=c( 57.8, 60.2, 60.3, 57.9, 55.2, 54.8, 52.7, 53.0, 49.4 ) )