did jpeg outputs in r