some data and R plot