its(x, times, units = NULL, names = NULL) is.its(x)
is.its returns TRUE if x is of class "its" and FALSE otherwise.
whitenoise <-  matrix(rnorm(50), ncol = 2)
obs.times <- scan("sampling.times") # reading in a file of times
x <- its(whitenoise, times = obs.times, names = c("error1","error2"))
is.its(x)
birthdays <- dates(c("01/02/78", "10/21/81", "06/23/86",
                       "01/19/90", "06/29/92"))
ages <- c(15, 11, 7, 3, 1)
its(ages, times = birthdays)