Skip to contents

Applies strwrap to every character cell in a data frame, removing leading and trailing whitespace.

Usage

trim_df(df)

Arguments

df

A data frame containing one or more character columns.

Value

A data frame of the same dimensions with whitespace trimmed from all character cells. Non-character cells are unchanged.

Examples

string<-data.frame(str1=rep(paste0(sample(c(LETTERS,rep(" ",10))),collapse=""),10),
                   str2=rep(paste0(sample(c(LETTERS,rep(" ",10))),collapse=""),10),
                   num1=rnorm(10),
                   stringsAsFactors=FALSE)
trim_df(string)
#>                               str1                                str2    num1
#> 1  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF -1.2283
#> 2  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF -1.1729
#> 3  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF  0.7905
#> 4  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF  0.6196
#> 5  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF  1.0901
#> 6  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF  0.2183
#> 7  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF -2.3666
#> 8  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF -0.9299
#> 9  RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF  0.4009
#> 10 RB YP S IDQTEHXCKJ LU FVZONMWGA H X DCB WV IOA QT PMZ RSUJKYN G LEF -0.7260