From cb605f2d25586a2f4b30871a65233b46c339adb8 Mon Sep 17 00:00:00 2001
From: Pierre-Edouard Portier <p6e7p7@freeshell.org>
Date: Mon, 14 Mar 2022 13:30:54 +0100
Subject: [PATCH] =?UTF-8?q?correction=20erreur=20sur=20taille=20init=20de?=
 =?UTF-8?q?=20la=20matrice=20des=20coefs=20pour=20diff=C3=A9rentes=20valeu?=
 =?UTF-8?q?rs=20de=20lambda?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 15_loocv.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/15_loocv.R b/15_loocv.R
index 7733d25..8b9ab34 100644
--- a/15_loocv.R
+++ b/15_loocv.R
@@ -22,7 +22,7 @@ ridge.svd <- function(data, degre) {
 
 ridge.loocv <- function(data, deg, lambdas) {
   errs <- double(length(lambdas))
-  coefs <- matrix(data = NA, nrow = nrow(data$X), ncol = 1+deg)
+  coefs <- matrix(data = NA, nrow = length(lambdas), ncol = 1+deg)
   ridge <- ridge.svd(data, deg)
   idx <- 1
   for(lambda in lambdas) {