diff --git a/DESCRIPTION b/DESCRIPTION
index cd6b0fe..53c6f7a 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -34,7 +34,6 @@ Imports: shiny,
     gplots,
     reshape,
     rintrojs,
-    Kmisc,
     webshot,
     RJSONIO,
     ggrepel (>= 0.6.12),
diff --git a/R/parser.R b/R/parser.R
index 5367f3c..c10c166 100644
--- a/R/parser.R
+++ b/R/parser.R
@@ -303,7 +303,7 @@ parser <- function(file, dec = ".") {
   message(paste("Parsing file:", file))
 
   #number of rows for each part
-  file.lines <- Kmisc::readlines(file)
+  file.lines <- data.table::fread(file, header = FALSE, fill = TRUE, select = 1)[[1]]
   num.header <- length(grep("^!", file.lines))
   num.metadata <- length(grep("^#", file.lines))