Modérateur : Groupe des modérateurs
Code : Tout sélectionner
n <- 40
y <- rnorm(n)
results <- Jeffreys(y, L=100)
Code : Tout sélectionner
f <- function(x) 4+2*x
n <- 20
x <- seq_len(n); y <- f(x)+rnorm(n)
results <- Jeffreys(y, X=model.matrix(~x), L=30)
Retourner vers « Questions en cours »
Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité