pro MYOPLOT, x, y, red=red, _extra=_extra ;+ ; NAME: ; MYOPLOT ; ; PURPOSE: ; Mattia's Very Own O-Plotting Routine ; ; INPUTS: ; X - abscissa/ordinate data points (if Y is/isnot set) ; Y (optional) - ordinate data points ; KEYWORDS: ; RED (SCL INT) - plotting reduction factor (one out of RED points is actually plotted) ; (e.g. for crowded plots and/or to speed up plotting) ; ; MODIFICATION HISTORY: ; 27 Nov 2007 Adapted from his own MYPLOT by Mattia Vaccari ;- on_error,2 if keyword_set(red) then begin j=lindgen(n_elements(x)/red)*red endif else j=lindgen(n_elements(x)) if keyword_set(y) then oplot,x[j],y[j],_extra=_extra else oplot,x[j],_extra=_extra end