Update mtcar-example.R