diff --git a/R/entrez_fetch.r b/R/entrez_fetch.r
index 055c7ec..db259c4 100755
--- a/R/entrez_fetch.r
+++ b/R/entrez_fetch.r
@@ -56,8 +56,6 @@ entrez_fetch <- function(db, id=NULL, web_history=NULL, rettype, retmode="", par
     }
     args <- c(list("efetch", db=db, rettype=rettype, config=config, ...), identifiers) 
     records <- do.call(make_entrez_query, args) 
-    #NCBI limits requests to three per second
-    Sys.sleep(0.33)
     if(parsed){
         #At the moment, this is just a long-winded way to call
         #XML::xmlTreeParse, but we already use this approach to parse
diff --git a/R/entrez_global_query.r b/R/entrez_global_query.r
index e5f505f..5b90fbb 100755
--- a/R/entrez_global_query.r
+++ b/R/entrez_global_query.r
@@ -25,7 +25,6 @@ entrez_global_query <- function(term, config=NULL, ...){
         res <- as.numeric(xpathSApply(record, path, xmlValue))
     }
     #NCBI limits requests to three per second
-    Sys.sleep(0.33)
     res <- structure(sapply(db_names, get_Ids), names=db_names)
     return(res)
 }
diff --git a/R/entrez_link.r b/R/entrez_link.r
index f1f2741..8c017bc 100755
--- a/R/entrez_link.r
+++ b/R/entrez_link.r
@@ -64,7 +64,6 @@ entrez_link <- function(dbfrom, web_history=NULL, id=NULL, db=NULL, cmd='neighbo
     } 
     response <- do.call(make_entrez_query,args)
     record <- parse_response(response, 'xml')
-    Sys.sleep(0.33)
     res <- parse_elink(record, cmd=cmd, by_id=by_id)
     if(!is.null(id) & by_id){
         if(length(res) != length(id)){
diff --git a/R/entrez_post.r b/R/entrez_post.r
index a2a6d5a..aef67a1 100755
--- a/R/entrez_post.r
+++ b/R/entrez_post.r
@@ -35,8 +35,6 @@ entrez_post <- function(db, id=NULL, web_history=NULL, config=NULL, ...){
     result <- xpathApply(record, "/ePostResult/*", XML::xmlValue)
     names(result) <- c("QueryKey", "WebEnv")
     class(result) <- c("web_history", "list")
-    #NCBI limits requests to three per second
-    Sys.sleep(0.33)
     return(result)
 }