rcode dir and plot.R shell