new file a.R - demo