[R] return unique values from date/time class object
McClatchie, Sam (PIRSA-SARDI)
mcclatchie.sam at saugov.sa.gov.au
Tue Aug 16 03:37:08 CEST 2005
Background:
OS: Linux Mandrake 10.1
release: R 2.1.1
editor: GNU Emacs 21.3.2
front-end: ESS 5.2.3
---------------------------------
Thanks to Brian Ripley (I've upgraded from source, thanks for the reminder)
and Petr Pikal for their suggestions, but I have not made clear the form of
my data:
Browse[1]> ceduna[1:10,]
LSD AVIATION_ID WND_DIR WND_SPD_MPS
1 1/01/2001 10:30:00 YCDU 230 4.6
2 1/01/2001 11:00:00 YCDU 210 4.1
3 1/01/2001 11:30:00 YCDU 230 6.7
4 1/01/2001 12:00:00 YCDU 230 7.7
5 1/01/2001 12:30:00 YCDU 220 8.2
6 1/01/2001 13:00:00 YCDU 210 7.2
7 1/01/2001 13:30:00 YCDU 210 7.2
8 1/01/2001 14:00:00 YCDU 200 6.7
9 1/01/2001 14:30:00 YCDU 190 7.7
10 1/01/2001 15:00:00 YCDU 200 8.2
Browse[1]> class(ceduna)
[1] "data.frame"
Browse[1]> x <- as.character(ceduna$LSD)
Browse[1]> new.time <- strptime(x, "%d/%m/%Y %H:%M:%S")
Browse[1]> class(new.time)
[1] "POSIXt" "POSIXlt"
Browse[1]> unique(new.time)
Error in unique.default(new.time) : unique() applies only to vectors
Browse[1]> tt <- new.time[!duplicated(unclass(new.time))]
Error in duplicated.default(unclass(new.time)) :
duplicated() applies only to vectors
Browse[1]>
I'm obviously doing something silly with the data classes, but what?
Best fishes
Sam
----
Sam McClatchie,
Biological oceanography
South Australian Aquatic Sciences Centre
PO Box 120, Henley Beach 5022
Adelaide, South Australia
email <mcclatchie.sam at saugov.sa.gov.au>
Cellular: 0431 304 497
Telephone: (61-8) 8207 5448
FAX: (61-8) 8207 5481
Research home page <http://www.members.iinet.net.au/~s.mcclatchie/>
/\
...>><xX(°>
//// \\\\
<°)Xx><<
///// \\\\\\
><(((°>
>><(((°> ...>><xX(°>O<°)Xx><<
More information about the R-help
mailing list