1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
|
\name{trim}
\alias{trim}
\alias{trim,Raster-method}
\alias{trim,character-method}
\alias{trim,matrix-method}
\alias{trim,data.frame-method}
\title{Trim}
\description{
Trim (shrink) a Raster* object by removing outer rows and columns that all have the same value (e.g. NA).
Or remove the whitespace before or after a string of characters (or a matrix, or the character values in a data.frame).
}
\usage{
\S4method{trim}{Raster}(x, padding=0, values=NA, filename='', ...)
\S4method{trim}{character}(x, internal=FALSE, ...)
}
\arguments{
\item{x}{Raster* object or a character string}
\item{values}{numeric. Value(s) based on which a Raster* should be trimmed}
\item{padding}{integer. Number of outer rows/columns to keep}
\item{filename}{character. Optional output filename}
\item{internal}{logical. If \code{TRUE}, sequential internal spaces are replaced by a single space}
\item{...}{If \code{x} is a Raster* object: additional arguments as for \code{\link{writeRaster}}}
}
\value{
A RasterLayer or RasterBrick object (if \code{x} is a Raster* object) or a character string (if \code{x} is a character string).
}
\author{Robert J. Hijmans and Jacob van Etten}
\examples{
r <- raster(ncol=18,nrow=18)
r[39:49] <- 1
r[113:155] <- 2
r[200] <- 6
s <- trim(r)
trim(" hi folks ! ")
}
\keyword{spatial}
|
