Yes, each column shall have different sequence of row names
N On Wed, Aug 29, 2012 at 5:21 PM, PIKAL Petr <petr.pi...@precheza.cz> wrote: > Hi**** > > ** ** > > But in your example there are no row names? How would you structure the > result? Each column has different order and therefore each column shall > have different sequence of row names?**** > > ** ** > > Send also your responses to r-help as somebody could have better answer > for you.**** > > ** ** > > Regards**** > > Petr**** > > ** ** > > ** ** > > ** ** > > *From:* Nico Met [mailto:nicome...@gmail.com] > *Sent:* Wednesday, August 29, 2012 4:56 PM > *To:* PIKAL Petr > > *Subject:* Re: [R] Sorting of columns of a matrix**** > > ** ** > > Thanks a lot. **** > > ** ** > > But I also want to attach row names (if available) associated with each > column. **** > > ** ** > > In that case does your second code works in the same way?**** > > ** ** > > thanks **** > > ** ** > > Animesh **** > > ** ** > > ** ** > > On Wed, Aug 29, 2012 at 4:46 PM, PIKAL Petr <petr.pi...@precheza.cz> > wrote:**** > > Hi**** > > > > > > -----Original Message----- > > From: r-help-boun...@r-project.org [mailto:r-help-bounces@r- > > project.org] On Behalf Of Nico Met > > Sent: Wednesday, August 29, 2012 4:25 PM > > To: Berend Hasselman > > Cc: r-help@r-project.org > > Subject: Re: [R] Sorting of columns of a matrix > > > > Please find the require info: > > > > > > set.seed(12345) > > X<-matrix(rnorm(5*10),nrow=5) > >**** > > <snip>**** > > > > > > X[2,5]<-0 > > X[3,1]<-0 > > X[5,8]<-0**** > > <snip> > > > > > dput(X) > > > > structure(c(0.585528817843856, 0.709466017509524, 0, - > > 0.453497173462763, 0.605887455840393, -1.81795596770373,**** > > > 0.630098551068391, -0.276184105225216, -0.284159743943371, - > > 0.919322002474128, -0.116247806352002, 1.81731204370422, > > 0.370627864257954, 0.520216457554957, -0.750531994502331, > > 0.816899839520583, -0.886357521243213, -0.331577589942552, > > 1.12071265166956, 0.298723699267293, 0.779621924555324, 0, - > > 0.644328429231302, -1.55313740522969, -1.59770951669631, > > 1.80509751881082, -0.481647363694637, 0.620379801298422, > > 0.612123492650849, -0.162310976918126, 0.81187317855386, > > 2.19683354634753, 2.04919033740619, 1.63244563948047, > > 0.254271192814055, 0.491188279272559, -0.324086578737118, - > > 1.66205024385863, 1.76773385087297, 0, 1.12851083359018, - > > 2.38035806139704, -1.06026555215253, 0.937140540182908, > > 0.854451720330554, 1.46072940310409, -1.4130987778892, > > 0.567403253424482, 0.583187653435685, -1.30679883346442), .Dim = c(5L, > > 10L)) > >**** > > I am not sure what do you want to do with it? Remove rows which has 0 > > X[X==0]<-NA > X[complete.cases(X),] > > remove zeroes and sort values independently in each column? > > X[X==0]<-NA > apply(X, 2, sort, decreasing=TRUE) > > results in list as you have various number of values in columns. > > Regards > Petr**** > > > > > > On Wed, Aug 29, 2012 at 4:16 PM, Berend Hasselman <b...@xs4all.nl> > > wrote: > > > > > > > > On 29-08-2012, at 16:08, Nico Met wrote: > > > > > > > Hello john, > > > > > > > > thanks for the suggestion. Please find an example: > > > > > > > >> X<-matrix(rnorm(5*10),nrow=5) > > > > > > > >> dim(X) > > > > [1] 5 10 > > > >> X > > > > [,1] [,2] [,3] [,4] [,5] > > [,6] > > > > [,7] [,8] [,9] [,10] > > > > [1,] 1.2774431 -1.2427735 0.81933548 -2.1098586 -1.6726799 > > > > -2.2994684 > > > > -0.28823228 0.1929301 0.1187168 -1.2078372 [2,] 0.5969187 > > > > -1.2571336 0.30292368 -0.2098139 -0.9689961 1.7105109 > > > > 0.77240398 0.1482712 -1.2486152 0.2359723 [3,] -0.9669289 > > > > -0.2315229 1.04611417 0.7902772 0.5791674 0.6296305 > > > > -0.60517647 0.5317435 -0.2556417 -0.4838956 [4,] -1.9345400 > > > > 0.2898647 0.08983352 0.1482130 0.8229054 0.7778114 > > > > 0.49423641 0.4015327 2.8596603 0.6618432 [5,] -1.1969226 > > > > -1.3991657 -0.76507258 0.5024922 0.2633307 0.0236774 > > > > -0.09497448 -0.3986624 0.1327156 -0.8935923 > > > > > > > >> X[2,5]<-0 > > > >> X[3,1]<-0 > > > >> X[6,8]<-0 > > > >> X[5,8]<-0 > > > >> X > > > > [,1] [,2] [,3] [,4] [,5] > > [,6] > > > > [,7] [,8] [,9] [,10] > > > > [1,] 1.2774431 -1.2427735 0.81933548 -2.1098586 -1.6726799 > > > > -2.2994684 > > > > -0.28823228 0.1929301 0.1187168 -1.2078372 [2,] 0.5969187 > > > > -1.2571336 0.30292368 -0.2098139 0.0000000 1.7105109 > > > > 0.77240398 0.1482712 -1.2486152 0.2359723 [3,] 0.0000000 > > > > -0.2315229 1.04611417 0.7902772 0.5791674 0.6296305 > > > > -0.60517647 0.5317435 -0.2556417 -0.4838956 [4,] -1.9345400 > > > > 0.2898647 0.08983352 0.1482130 0.8229054 0.7778114 > > > > 0.49423641 0.4015327 2.8596603 0.6618432 [5,] -1.1969226 > > > > -1.3991657 -0.76507258 0.5024922 0.2633307 0.0236774 > > > > -0.09497448 0.0000000 0.1327156 -0.8935923 > > > > > > This is just as unreadable as your first try. > > > Please do as suggested > > > > > > dput(X) > > > > > > and also include a set.seed() before generating the matrix to make it > > > reproducible. > > > > > > Berend > > > > > > > >**** > > > [[alternative HTML version deleted]] > > > > ______________________________________________ > > 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.**** > > ** ** > [[alternative HTML version deleted]] ______________________________________________ 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.
