updated readme fixed filter_row bug

DESCRIPTION

@@ -15,7 +15,7 @@ Depends: R (>= 3.2.3)
 Imports: english(>= 1.0-2), qdapRegex, stringi, textshape(>= 1.0.1),
         utils
 Suggests: testthat, lexicon(>= 0.1.0)
-Date: 2017-02-15
+Date: 2017-02-16
 License: GPL-2
 LazyData: TRUE
 Roxygen: list(wrap = FALSE)

R/filter_row.R

@@ -32,7 +32,7 @@
 filter_row <- function(dataframe, column, terms, ...) {
 
     terms <- paste(terms, collapse="|")
-    if (nrow(dataframe[[column]]) == 0) stop("No columns in the data appear to match supplied `column`")    
+    if (length(dataframe[[column]]) == 0) stop("No columns in the data appear to match supplied `column`")    
     dataframe <- dataframe[!grepl(terms, dataframe[[column]], perl=TRUE, ...), ]
     rownames(dataframe) <- NULL
 

README.md

@@ -163,31 +163,26 @@ table below:
 <td>Replace regex white space characters</td>
 </tr>
 <tr class="even">
+<td><code>replace_token</code></td>
+<td>replacement</td>
+<td>Remove or replace a vector of tokens with a single value</td>
+</tr>
+<tr class="odd">
 <td><code>add_comma_space</code></td>
 <td>replacement</td>
 <td>Replace non-space after comma</td>
 </tr>
-<tr class="odd">
+<tr class="even">
 <td><code>add_missing_endmark</code></td>
 <td>replacement</td>
 <td>Replace missing endmarks with desired symbol</td>
 </tr>
-<tr class="even">
-<td><code>stem_words</code></td>
-<td>stemming</td>
-<td>Stem words</td>
-</tr>
 <tr class="odd">
-<td><code>stem_strings</code></td>
-<td>stemming</td>
-<td>Stem strings</td>
-</tr>
-<tr class="even">
 <td><code>check_text</code></td>
 <td>check</td>
 <td>Text report of potential issues</td>
 </tr>
-<tr class="odd">
+<tr class="even">
 <td><code>has_endmark</code></td>
 <td>check</td>
 <td>Check if an element has an end-mark</td>
@@ -449,7 +444,7 @@ And if all is well the user should be greeted by a cow:
     ## 
     ##  ------- 
     ## No problems found!
-    ## You are virtuosic! 
+    ## You are breathtaking! 
     ##  -------- 
     ##     \   ^__^ 
     ##      \  (oo)\ ________