update to keras3 for compatibility with newst R (see rstudio/keras3#1428)

Author: OliverSchacht

PM3/r_functional_approximation_by_nn_and_rf.irnb

@@ -39,7 +39,7 @@
     "install.packages(\"randomForest\")\n",
     "install.packages(\"rpart\")\n",
     "install.packages(\"gbm\")\n",
-    "install.packages(\"keras\")"
+    "install.packages(\"keras3\")"
    ]
   },
   {
@@ -56,7 +56,7 @@
     "library(randomForest)\n",
     "library(rpart)\n",
     "library(gbm)\n",
-    "library(keras)"
+    "library(keras3)"
    ]
   },
   {
@@ -356,7 +356,7 @@
     "    layer_dense(units = 1)\n",
     "\n",
     "  model %>% compile(\n",
-    "    optimizer = optimizer_adam(lr = 0.01),\n",
+    "    optimizer = optimizer_adam(learning_rate = 0.01),\n",
     "    loss = \"mse\",\n",
     "    metrics = c(\"mae\"),\n",
     "  )\n",
@@ -475,7 +475,7 @@
     "\n",
     "# Compile the model\n",
     "model %>% compile(\n",
-    "  optimizer = optimizer_adam(lr = 0.01),\n",
+    "  optimizer = optimizer_adam(learning_rate = 0.01),\n",
     "  loss = \"mse\",\n",
     "  metrics = c(\"mae\"),\n",
     ")\n",

PM3/r_ml_wage_prediction.irnb

@@ -57,7 +57,7 @@
     "install.packages(\"nnet\")\n",
     "install.packages(\"gbm\")\n",
     "install.packages(\"rpart.plot\")\n",
-    "install.packages(\"keras\")"
+    "install.packages(\"keras3\")"
    ]
   },
   {
@@ -78,7 +78,7 @@
     "library(nnet)\n",
     "library(gbm)\n",
     "library(rpart.plot)\n",
-    "library(keras)"
+    "library(keras3)"
    ]
   },
   {
@@ -1281,7 +1281,7 @@
     "\n",
     "# Compile the model\n",
     "model %>% compile(\n",
-    "  optimizer = optimizer_adam(lr = 0.01),\n",
+    "  optimizer = optimizer_adam(learning_rate = 0.01),\n",
     "  loss = \"mse\",\n",
     "  metrics = c(\"mae\"),\n",
     ")\n",