Thank you both for the replies. While neither produced the exact desired
results, they spurred some new thinking about how to approach the problem. I
came up with a way to get the output desired, but it is probably pretty
clunky. I will post it here anyway, in case someone is interested in the
futu
You might try using "outer" to create a matrix that will help out:
> Time <- c(1000, 1050, 1100, 1500, 2500, 5000, 6500, 6600, 7000)
> Time
[1] 1000 1050 1100 1500 2500 5000 6500 6600 7000
> ?outer
starting httpd help server ... done
> x <- outer(Time, Time, FUN = function(a, b){d <- b-a; (d>=0) &
-BEGIN PGP SIGNED MESSAGE-
Hash: SHA1
Hello,
as far as I understood your problem, this function might do the trick:
CountNextBehavior <- function (data.source, interest.behavior,
lev.ignore, interest.timeframe) {
## --
## Ret
Hello all,
I have a question which I have been struggling with for several weeks
now, that I think might be easy for more proficient coders than
myself. I have a large behavioral dataset, with behaviors and the
times (milliseconds) that they occurred. Each subject has a separate
file, and a sample
4 matches
Mail list logo