R source for plotting Stock Open Interest