RSEIS (version 3.7-4)

secdif: Return difference in seconds

Description

Difference between two Date/Times (Julian Day)

Usage

secdif(jd1, hr1, mi1, sec1, jd2, hr2, mi2, sec2)

Arguments

jd1

Julian Day

hr1

hour

mi1

minute

sec1

second

jd2

Julian Day

hr2

hour

mi2

minute

sec2

second

Value

numeric

seconds

Details

Returns T2-T1. Year is not included.

See Also

secdifL

Examples

# NOT RUN {
T1 <- list(jd=12, hr=13, mi=23, sec=21)
T2 <- list(jd=14, hr=23, mi=23, sec=2)
secdif(T1$jd, T1$hr, T1$mi, T1$sec,  T2$jd, T2$hr, T2$mi, T2$sec)

# }