Like this ? sum every batch of n rows?

N <- 2
t(kronecker(diag(nrow(sens2)/N),rep(1,N))) %*% as.matrix(sens2)

           Time         Y         X rownumber
[1,] 2657130134 0.3236854 0.1080725         3
[2,] 2657130134 0.4621816 0.1198302         7
[3,] 2657130134 0.4341804 0.1069583        11

Check rownumber column: 1+2 = 3, 3+4 = 7, 5+6=11 ...

Or sum every 3 rows:
 N <- 3
 t(kronecker(diag(nrow(sens2)/N),rep(1,N))) %*% as.matrix(sens2 )
           Time         Y         X rownumber
[1,] 3985695201 0.5646581 0.1693338         6
[2,] 3985695202 0.6553893 0.1655272        15

Hope this helps (more...).

On Mon, Feb 13, 2012 at 4:04 PM, Hasan Diwan <hasan.di...@gmail.com> wrote:
> On 13 February 2012 14:46, ilai <ke...@math.montana.edu> wrote:
>> The function you posted runs without error (on these 6 lines), but
>> does not return anything that looks remotely like a sum, or cumsum of
>> anything. Can you clarify what you are trying to do? I assume by "sum
>> of every other row" you don't mean summing Time, X and Y for rows
>> 1,3,5,..., ?
>
> I'm trying to get a piecewise sum of every n rows in a given column in
> this data set.
>> For the sum of sens2[c(1,3,5,...),] for every column (assuming no NA's
>> in the data) you could
>
> I do format checking well before getting to this stage in the analysis.
>>
>>  (1:nrow(sens2) %% 2) %*% as.matrix(sens2)
>
> That does not do what I want... Again, what it should return is a list
> of the sum of the current and preceding row.
> --
> Sent from my mobile device
> Envoyait de mon portable
>
> ______________________________________________
> 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.

______________________________________________
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