Hello,

Try the following.


mat <- data.matrix(read.table(text="
2011    7   21   15   25 20.609
2011    7   21   15   25 23.265
2011    7   21   15   25 26.000
2011    7   21   15   25 28.671
2011    7   21   15   25 31.343"))

secs <- apply(mat, 1, function(x)
     ISOdatetime(x[1], x[2], x[3], x[4], x[5], x[6]))
diff(secs)

# convert to date/time if you need them
dates <- as.POSIXlt(secs, origin="1970-01-01")
diff(dates)

Hope this helps,

Rui Barradas
Em 31-07-2012 13:58, Alaios escreveu:
> Dear all,
> I am having a matrix that stores data information in the following format.
>
>> roofPart1$TimeStamps[1:5,]
>       [,1] [,2] [,3] [,4] [,5]   [,6]
> [1,] 2011    7   21   15   25 20.609
> [2,] 2011    7   21   15   25 23.265
> [3,] 2011    7   21   15   25 26.000
> [4,] 2011    7   21   15   25 28.671
> [5,] 2011    7   21   15   25 31.343
>
>
> I would like to be able to report some simple statistics based on the time 
> differences of two entries. For example to check the time consistency (was my 
> device measuring at same intervals ?)
>
> I think the easiest would be to convert the matrix above to pure seconds and 
> then just substract them
>
>
> so something like that ...
>
> makeSeconds(roofPart1$TimeStamps[1:5,2])-makeSeconds(roofPart1$TimeStamps[1:5,1])
> makeSeconds(roofPart1$TimeStamps[1:5,3])-makeSeconds(roofPart1$TimeStamps[1:5,2])
> makeSeconds(roofPart1$TimeStamps[1:5,4])-makeSeconds(roofPart1$TimeStamps[1:5,3])
>
>
> Do you know which are the functions for that? A) convert time stamps to 
> seconds, B) substract the concecutive elements of the seconds matrix
>
>
> I would like to thank you in advance for your help
>
> B.R
> Alex
>       [[alternative HTML version deleted]]
>
>
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.


        [[alternative HTML version deleted]]

______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.

Reply via email to