diff --git a/R/images_scrap.R b/R/images_scrap.R
index 41f70b0..14d4690 100644
--- a/R/images_scrap.R
+++ b/R/images_scrap.R
@@ -99,7 +99,7 @@ images_scrap <- function(link,
     for (i in seq_along(img_urls_f)) {
 
       download.file(img_urls_f[i],
-                    destfile = basename(img_urls_f[i]),
+                    destfile = paste0(imgpath, "/", basename(img_urls_f[i])),
                     mode = "wb")
 
     }
diff --git a/R/pdfs_scrap.R b/R/pdfs_scrap.R
index e75df60..14e3367 100644
--- a/R/pdfs_scrap.R
+++ b/R/pdfs_scrap.R
@@ -51,7 +51,6 @@
         }
       }
 
-
     )
 
   }
@@ -59,7 +58,6 @@
 }
 
 
-
 #' Scrape and download pdf files from a Web Page
 #'
 #' @param link the link of the web page