[R] Trim

[Berend Hasselman]

On 05-12-2012, at 11:46, Vasilchenko Aleksander wrote:

> Hello,
> I have a dataframe
> 
> 1 2006-11       NaN
> 2 2006-12       NaN
> 3 2006-10 0.1577647
> 4 2006-11       NaN
> 5 2006-12       NaN
> 6 2007-01       NaN
> 7 2007-02       NaN
> 8 2007-03 0.2956429
> 9 2007-01       NaN
> 10 2007-02       NaN
> I need to trim first and last NaN rows
> Result -
> 1 2006-10 0.1577647
> 2 2006-11       NaN
> 3 2006-12       NaN
> 4 2007-01       NaN
> 5 2007-02       NaN
> 6 2007-03 0.2956429

 dat <-
+ structure(list(V1 = structure(c(2L, 3L, 1L, 2L, 3L, 4L, 5L, 6L,
+ 4L, 5L), .Label = c("2006-10", "2006-11", "2006-12", "2007-01",
+ "2007-02", "2007-03"), class = "factor"), V2 = c(NaN, NaN, 0.1577647,
+ NaN, NaN, NaN, NaN, 0.2956429, NaN, NaN)), .Names = c("V1", "V2"
+ ), class = "data.frame", row.names = c("1", "2", "3", "4", "5",
+ "6", "7", "8", "9", "10"))

library(zoo)
na.trim(dat)

Berend