Displaying 1 result from an estimated 1 matches for "start_end".
Did you mean:
start_send
2008 Sep 01
1
how to pass additional parameters to a function called in tapply?
...riod for each channel as
marked in the factor vector since the hardware switching between channels
causes some transients in the signal which should not be included when
calculating the mean.
Instead of using "mean" as function within tapply, I used the following set of
functions:
start_end.f <- function(x) { c(length(x)*(1-part),length(x)) }
to define the part of the data to use (e.g. part=0.5 the last 50% of the total
period),
#(part has so far been set universally once for the whole analysis, but see
below)#
avg.f <- function(x) {
range <- start_end.f(x)
mean(x[...