diff --git a/r/src/R/ai/h2o/sparkling/H2OContext.R b/r/src/R/ai/h2o/sparkling/H2OContext.R
index ab56f78381..da79d88456 100644
--- a/r/src/R/ai/h2o/sparkling/H2OContext.R
+++ b/r/src/R/ai/h2o/sparkling/H2OContext.R
@@ -97,6 +97,10 @@ H2OContext <- setRefClass("H2OContext", fields = list(jhc = "ANY"), methods = li
   getH2OLogLevel = function() {
     invoke(.self$jhc, "getH2OLogLevel")
   },
+  downloadH2OLogs = function(destination, container = c("ZIP", "LOG")) {
+    container <- match.arg(container)
+    invoke(.self$jhc, "downloadH2OLogs", destination, container)
+  },
   importHiveTable = function(database = "default", table, partitions = NULL, allowMultiFormat = FALSE) {
     library(h2o)
     h2o.import_hive_table(database, table, partitions, allowMultiFormat)