Remove leading and trailing rows of all NA
TrimNA.RdRemove leading and trailing rows of all NA
Usage
TrimNA(m, trim = c("all", "any"))Arguments
- m
a numeric matrix, data.frame or vector
- trim
trim leading and trailing rows of "all" NA or containing "any" NA values
Examples
m <- matrix(c(NA, NA, NA, 1, NA, NA, NA, 1, 1, NA, NA, NA, 1:9, NA,NA,NA, 10:12, NA, 1, NA, NA,NA,NA), ncol = 3, byrow = TRUE)
m
#> [,1] [,2] [,3]
#> [1,] NA NA NA
#> [2,] 1 NA NA
#> [3,] NA 1 1
#> [4,] NA NA NA
#> [5,] 1 2 3
#> [6,] 4 5 6
#> [7,] 7 8 9
#> [8,] NA NA NA
#> [9,] 10 11 12
#> [10,] NA 1 NA
#> [11,] NA NA NA
TrimNA(m)
#> [,1] [,2] [,3]
#> [1,] 1 NA NA
#> [2,] NA 1 1
#> [3,] NA NA NA
#> [4,] 1 2 3
#> [5,] 4 5 6
#> [6,] 7 8 9
#> [7,] NA NA NA
#> [8,] 10 11 12
#> [9,] NA 1 NA
TrimNA(m, trim = "any")
#> [,1] [,2] [,3]
#> [1,] 1 2 3
#> [2,] 4 5 6
#> [3,] 7 8 9
#> [4,] NA NA NA
#> [5,] 10 11 12