add plot function and R data files