Remove space after characters in R?

Question

I currently have a script that writes an Excel file and sends out an email from R. My loop fails because when the excel path is created there a space for whatever reason (see below). How can I get rid of the spaces after the vendor name? It would be great if someone can provide a dplyr solution.

Old :

Vendor_Name               
   <chr>                     
 1 "INTERLINE BRANDS"        
 2 "GENERAC SO"              
 3 "SO DIMPLEX NORTH AMERIC" 
 4 "ZEPENFORCER"             
 5 "SO TORO                " 
 6 "SO MTDARNOLD PRODUCTS "  
 7 "SO IMPERIAL INDUSTRIAL " 
 8 "SO QUICKIE             " 
 9 "SO RUBBERMAID SPECIALTY" 
10 "TIGER SUPPLIES          "

Ideal :

Vendor_Name               
   <chr>                     
 1 "INTERLINE BRANDS"        
 2 "GENERAC SO"              
 3 "SO DIMPLEX NORTH AMERIC" 
 4 "ZEPENFORCER"             
 5 "SO TORO" 
 6 "SO MTDARNOLD PRODUCTS"  
 7 "SO IMPERIAL INDUSTRIAL" 
 8 "SO QUICKIE" 
 9 "SO RUBBERMAID SPECIALTY" 
10 "TIGER SUPPLIES"

Answer 1

Use trimws :

trimws(x$Vendor_Name)
#  [1] "INTERLINE BRANDS"        "GENERAC SO"              "SO DIMPLEX NORTH AMERIC" "ZEPENFORCER"            
#  [5] "SO TORO"                 "SO MTDARNOLD PRODUCTS"   "SO IMPERIAL INDUSTRIAL"  "SO QUICKIE"             
#  [9] "SO RUBBERMAID SPECIALTY" "TIGER SUPPLIES"         

library(dplyt)
x %>%
  mutate(Vendor_Name = trimws(Vendor_Name))
#                Vendor_Name
# 1         INTERLINE BRANDS
# 2               GENERAC SO
# 3  SO DIMPLEX NORTH AMERIC
# 4              ZEPENFORCER
# 5                  SO TORO
# 6    SO MTDARNOLD PRODUCTS
# 7   SO IMPERIAL INDUSTRIAL
# 8               SO QUICKIE
# 9  SO RUBBERMAID SPECIALTY
# 10          TIGER SUPPLIES

---

Data

x <- structure(list(Vendor_Name = c("INTERLINE BRANDS", "GENERAC SO", "SO DIMPLEX NORTH AMERIC", "ZEPENFORCER", "SO TORO                ", "SO MTDARNOLD PRODUCTS ", "SO IMPERIAL INDUSTRIAL ", "SO QUICKIE             ", "SO RUBBERMAID SPECIALTY", "TIGER SUPPLIES          ")), class = "data.frame", row.names = c(NA, -10L))