> -----Original Message-----

> From:

[hidden email] [mailto:r-help-bounces@r-

> project.org] On Behalf Of behave14

> Sent: Monday, March 12, 2012 11:15 AM

> To:

[hidden email]
> Subject: [R] Maximum of remaining elements of vector

>

> Dear community

>

> I have the following problem. I'd like to have the maximum of the

> remaining

> elements of a vector.

>

> ex.

> x<-c(1,2,3,4,1,2,3,1,2,1)

>

> f(x) = c(4,4,4,4,3,3,3,2,2,1)

>

> where the first element is: max(x[1:length(x])

> the second one: max(x[2:length(x)])

> the third one: max(x[3:length(x)]) and so on

>

> Of course this can be done with a loop, but isn't there a nicer and

> faster

> way to do so?

f <- function(x) sapply(1:length(x), function(y) max(x[y:length(x)]))

f(x)

----------------------------------------------

David L Carlson

Associate Professor of Anthropology

Texas A&M University

College Station, TX 77843-4352

______________________________________________

[hidden email] mailing list

https://stat.ethz.ch/mailman/listinfo/r-helpPLEASE do read the posting guide

http://www.R-project.org/posting-guide.htmland provide commented, minimal, self-contained, reproducible code.