Merge pull request #1462 from rstudio/retether-3.4.1

Retether-3.4.1
rstudio · Jun 27, 2024 · 8d33e07 · 8d33e07
2 parents e5817d9 + 3913aeb
commit 8d33e07
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -5,6 +5,8 @@
 
 - `keras_shape` objects (as returned by `keras3::shape()`) gain `==` and `!=` methods.
 
+- Added compatibility with Keras v3.4.1 (no R user facing changes).
+
 User facing changes with upstream Keras v3.4.0:
 
 - New function:

diff --git a/R/install.R b/R/install.R
@@ -95,6 +95,10 @@ install_keras <- function(
     packages = NULL
   )
   extra_packages <- unique(extra_packages)
+
+  if(!any(grepl("^numpy[=><!]?", extra_packages)))
+    extra_packages <- c(extra_packages, "numpy<2")
+
   if (length(extra_packages))
     reticulate::py_install(extra_packages, envname = envname)