-----Ursprüngliche Nachricht-----
Von: S Ellison <s.elli...@lgc.co.uk>
Gesendet: 07.05.2010 16:44:08
An: r-help@r-project.org,alfred-schu...@web.de
Betreff: Re: [R] Find the three best values in every row
>Hmm...
>
> set.seed(17*11)
> d<-data.frame(africa=sample(50, 10),
> europe= sample(50, 10),
> n.america= sample(50, 10),
> s.america= sample(50, 10),
> antarctica= sample((1:50)/20, 10)
> )
>
>#Get three top from each row
>t(apply(d,1,function(x,n) x[which(rank(x)> length(x)-n)], n=3))
>
>#Get them with names
>get.n<- function(x, names, n) {
> rmin<-
> rv<-x[w<-which(rank(x)> length(x)-n)]
> names(rv)<-names[w]
> return(as.data.frame(rv))
>}
>
>apply(d,1,get.n, n=3, names=names(d))
>
>
>
>>>> Alfred Schulze [ 05/07/10 2:43 PM >>>
>
> Hello,
>
> i have a dataframe with the GDP for different Country (in the
>columns) and
> Years (in the rows).
>
> Now i want for every year the best three values, if possible with
>name of
> the countries (columnnames).
>
> For the best it's no problem but for the other two values.
>
> Thanks,
>
> Alfred
>______________________________________________
>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.
>
>
>*******************************************************************
>This email and any attachments are confidential. Any use, copying or
>disclosure other than by the intended recipient is unauthorised. If
>you have received this message in error, please notify the sender
>immediately via +44(0)20 8943 7000 or notify postmas...@lgc.co.uk
>and delete this message and any copies from your computer and network.
>LGC Limited. Registered in England 2991879.
>Registered office: Queens Road, Teddington, Middlesex, TW11 0LY, UKtt
Thanks, that's what I need.
But I have some NA's in the data and
t(apply(data.frame,1,function(x,n) x[which(rank(x)> length(x)-n)], n=3,
na.rm=TRUE))
isn't working.
And I have a further question. How I get the value also sorted descending?
Thanks,
Alfred
___________________________________________________________
GRATIS: Movie-Flat mit über 300 Top-Videos. Für WEB.DE Nutzer
dauerhaft kostenlos! Jetzt freischalten unter http://movieflat.web.de
______________________________________________
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.
