diff --git a/R/as_key.R b/R/as_key.R
index 5bf9fcf..a0add31 100644
--- a/R/as_key.R
+++ b/R/as_key.R
@@ -75,13 +75,6 @@
 #' as_key(syuzhet:::bing)
 #' as_key(syuzhet:::afinn)
 #' as_key(syuzhet:::syuzhet_dict)
-#' nrc <- data.frame(
-#'     words = rownames(syuzhet:::nrc),
-#'     polarity = syuzhet:::nrc[, "positive"] - syuzhet:::nrc[, "negative"],
-#'     stringsAsFactors = FALSE
-#' )
-#'
-#' as_key(nrc[nrc[["polarity"]] != 0, ])
 #'
 #' sentiment(gsub("Sam-I-am", "Sam I am", sam_i_am), as_key(syuzhet:::bing))
 #' }
diff --git a/man/as_key.Rd b/man/as_key.Rd
index 16aede7..8bbef71 100644
--- a/man/as_key.Rd
+++ b/man/as_key.Rd
@@ -118,13 +118,6 @@ library(syuzhet)
 as_key(syuzhet:::bing)
 as_key(syuzhet:::afinn)
 as_key(syuzhet:::syuzhet_dict)
-nrc <- data.frame(
-    words = rownames(syuzhet:::nrc),
-    polarity = syuzhet:::nrc[, "positive"] - syuzhet:::nrc[, "negative"],
-    stringsAsFactors = FALSE
-)
-
-as_key(nrc[nrc[["polarity"]] != 0, ])
 
 sentiment(gsub("Sam-I-am", "Sam I am", sam_i_am), as_key(syuzhet:::bing))
 }