R codes and png images