[R] merge by time, certain value if 5 min before and after an "event"

[Dagmar]

Hello! I hope someone can help me. It would save me days of work. Thanks in
advance!
I have two dataframes which look like these:


myframe <- data.frame (Timestamp=c("24.09.2012 09:00:00", "24.09.2012
10:00:00",
"24.09.2012 11:00:00"), Event=c("low","high","low") )
myframe


mydata <- data.frame ( Timestamp=c("24.09.2012 09:05:01", "24.09.2012
09:49:50", "24.09.2012 09:51:01", "24.09.2012 10:04:50", "24.09.2012
10:05:10")
, location=c("1","2","3","1","5") )
mydata


# I want to merge them by time so I have a dataframe which looks like this
in the end (i.e. "Low"  during 5 min before and after "high" )

result <- data.frame ( Timestamp=c("24.09.2012 09:05:01", "24.09.2012
09:49:50", "24.09.2012 09:51:01", "24.09.2012 10:04:50", "24.09.2012
10:05:10")
, location=c("1","2","3","1","5") ,
Event=c("low", "low","high","high","low"))
result

Anyone knows how do merge them?
Best regards,
Dagmar