[R] How to know the row number of raw matrix after resampling?

About this list Date view Thread view Subject view Author view Attachment view

From: Taemyong Choi (tmchoi@ris.chonnam.ac.kr)
Date: Wed 12 May 2004 - 23:35:10 EST


Message-id: <200405121334.i4CDYfVt007466@ris.chonnam.ac.kr>


> DATA

            [,1]

 [1,] -2.0314185

 [2,] -0.3594015

 [3,] -1.3225832

 [4,] 1.5050892

 [5,] -0.4535558

 [6,] 3.6335036

 [7,] 5.1965750

 [8,] 4.2923129

 [9,] 6.0913187

[10,] 4.9131070

> RESA

           [,1] [,2] [,3] [,4] [,5]

[1,] -2.0314185 1.5050892 -1.3225832 -1.3225832 -2.0314185

[2,] -0.3594015 -0.3594015 4.2923129 -0.3594015 -0.4535558

[3,] 4.9131070 4.9131070 -2.0314185 4.9131070 3.6335036

[4,] 3.6335036 -0.4535558 3.6335036 1.5050892 -0.3594015

[5,] 1.5050892 6.0913187 -0.3594015 4.2923129 6.0913187

[6,] 6.0913187 3.6335036 5.1965750 -2.0314185 5.1965750

[7,] -0.4535558 5.1965750 6.0913187 3.6335036 4.9131070

First,

RESA matrix consists of resampling DATA matrix. I would like to know the row
number of RESA matrix's value in DATA matrix.

For example, RESA[1,1] = -2.0314185 and its row number in DATA matrix is 1.

                  RESA[1,3]=4.9131070 and its row number in DATA matrix is
10.

 

Is there a simple way to know the row number?

I

> clus

     col1 col2 col3 col4 col5

[1,] 1 1 1 1 1

[2,] 2 2 0 2 1

[3,] 2 1 1 2 2

[4,] 1 2 2 1 2

[5,] 3 1 2 2 3

[6,] 3 3 0 3 2

[7,] 1 3 2 0 0

Second, I want to count columns of each row without 0

i.e. The number of clus[2,]'s columns is 4.

 

I solve this with next code.

number <- c(rep(1,5)) # 5 is total column number.

sum(number[clus[2,]!=0])

Is there more simple method?

 

Finally, clus[2,]'s mode is 2. I try to find function to know mode, but I
have failed.

What's the function to know mode?

        [[alternative HTML version deleted]]

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://www.stat.math.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html


About this list Date view Thread view Subject view Author view Attachment view

This archive was generated by hypermail 2.1.3 : Mon 31 May 2004 - 23:05:09 EST