Epi: brush up R plotting function.