Create extendedplots.r