Re: Using TICKINTERVAL with LABEL_DATE in object_graphics [message #64948] |
Mon, 02 February 2009 14:55 |
natha
Messages: 482 Registered: October 2007
|
Senior Member |
|
|
Look that (my xrange is in JULIAN units),
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
nticks=8.
tickvalues=0
label_format = LABEL_DATE(DATE_FORMAT = ['%H:%I'])
interval_v=[1./3600.,1./1800.,5./3600.,1./360.,2./360.,3./36 0.,1./60.,
$
1./30.,1./12.,1./6.,.25,1./3.,.5,1,2,3,4,6,8,12,24]/24.
nticks_real=(xrange[1]-xrange[0])/interval_v
IF MAX(nticks_real) LT 2 THEN BEGIN
tickinterval=0
tickvalues=xrange
ENDIF ELSE BEGIN
difticks=nticks_real-nticks
wwdif=WHERE(ABS(difticks) EQ MIN(ABS(difticks)))
tickinterval=interval_v[wwdif]
IF tickinterval LT 1./1440. THEN label_format = LABEL_DATE
(DATE_FORMAT = ['%H:%I:%S'])
ENDELSE
Axis->SetProperty, TICKFORMAT='LABEL_DATE', TICKUNITS='DAY',
TICKINTERVAL=tickinterval, TICKVALUES=tickvalues, RANGE=xrange
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
cheers,
Bernat
|
|
|