Discussion :

[Ulath0]

Bonjour,

Il semble que les matrices soient passées par valeur, et donc recopiées :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
f = function(A) {
    A[1,1] = -1 ; A
}
M = matrix(runif(6),nrow=2) ; M[1,1]
> 0.9621319
(f(M))[1,1]
> -1
M[1,1]
0.9621319

Y a-t-il un moyen pour forcer le passage par référence ? (J'ai une fonction qui aimerait prendre deux matrices en paramètres, et être appelée très souvent )

Merci d'avance.

[pitipoisson]

Bonjour,

Le moyen, c'est de passer le nom de l'objet et celui de l'environnement d'où tu appelles la fonction (ou bien un autre si besoin) et d'utiliser get et assign :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
M <- matrix(runif(6),nrow=2) ; M[1,1]
 
f <- function(A, envir=parent.frame()) {
    ## print(envir)
    x <- get(A, envir=envir)
    x[1, 1] <- -1
    assign(A,  x, envir=envir)
}
 
 
f("M")
 
M

Note que c'est bien le nom de la matrice et non la matrice elle-même que tu dois passer en paramètre (ici, l'environnement par défaut suffit... mais, pour l'exemple, si t'appelles ta fonction f dans un sapply, faudrait mettre envir=parent.frame(2) si tu souhaites agir sur un objet de l'environnement d'où tu appelles le sapply, i.e. remonter de deux niveaux !)

Note également qu'il n'est pas possible d'assigner directement une valeur à un seul élément de la matrice depuis la fonction (du moins pas à ma connaissance, si quelqu'un sait comment faire, je suis archi-prenneur).

[Ulath0]

ça semble parfait pour le cas qui m'intéresse, merci !