Create xychart.R