markle...@verizon.net wrote:
> Thanks Rolf. very nice but "pretty easy" is ALWAYS a relative statement.
>
right. it's even "easier":
na.last = function(x) {
na = is.na(x)
c(x[!na], x[na]) }
>
>
> On Thu, Feb 12, 2009 at 3:59 PM, Rolf Turner wrote:
>
>> On 13/02/2009, at 9:06 AM, markle...@verizon.net wrote:
>>
>>> Hi Jason: below seems to work. you have to take the transpose because
>>> the apply
>>> returns the rows transposed. i'm also not sure how to make the NAs be
>>> the last
>>> ones but maybe someone can show us how to do that.
>>
>> Pretty easy:
>>
>> na.at.end <- function(x){
>> i <- is.na(x)
>> c(x[!i],rep(NA,sum(i)))
>> }
______________________________________________
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.
