R codes and png files