#-------------------------------------------------------------------------------
# Charater vector
x.chr <- c("a", "", "c", NA, "", "d", "e", NA)
# Example 1: Omit character string ""
chr.omit(x.chr)
# Example 2: Omit character string "" and missing values (NA)
chr.omit(x.chr, na.omit = TRUE)
# Example 3: Omit character string "c" and "e"
chr.omit(x.chr, omit = c("c", "e"))
# Example 4: Omit character string "c", "e", and missing values (NA)
chr.omit(x.chr, omit = c("c", "e"), na.omit = TRUE)
#-------------------------------------------------------------------------------
# Numeric vector
x.num <- c(1, 2, NA, 3, 4, 5, NA)
# Example 5: Omit values 2 and 4
chr.omit(x.num, omit = c(2, 4))
# Example 6: Omit values 2, 4, and missing values (NA)
chr.omit(x.num, omit = c(2, 4), na.omit = TRUE)
#-------------------------------------------------------------------------------
# Factor
x.factor <- factor(letters[1:10])
# Example 7: Omit factor levels "a", "c", "e", and "g"
chr.omit(x.factor, omit = c("a", "c", "e", "g"))
Run the code above in your browser using DataLab