multiplier tous les éléments d'un vecteur dans R

Question

Je veux une fonction pour retourner le produit de toutes les valeurs dans un vecteur, comme sum mais avec multiplication au lieu de l'addition. Je m'attendais à ce que cela existe déjà, mais si c'est le cas, je ne peux pas le trouver. Voici ma solution:

product <- function(vec){ 
    out <- 1 
    for(i in 1:length(vec)){ 
     out <- out*vec[i] 
    } 
    out 
} 

Ceci se comporte comme je le souhaite. Par exemple:

> product(1:3) 
[1] 6 

Y at-il une meilleure façon de le faire, que ce soit avec une fonction existante, soit par une amélioration de celui-ci personnalisé?

Answer 1

Vous voulez prod:

R> prod(1:3) 
[1] 6