Forum des étudiants du CERDI
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
-15%
Le deal à ne pas rater :
(Adhérents Fnac) LEGO® Star Wars™ 75367 Le croiseur d’assaut de ...
552.49 € 649.99 €
Voir le deal

Fonctions pair et impair

Aller en bas

Fonctions pair et impair Empty Fonctions pair et impair

Message  flbresson Mer 17 Nov - 11:58

Un petit truc bête qui ne mange pas de pain. Comme je construit tous mes tableaux sous R avant export sous latex, je dois souvent différencier les lignes paires et impaires de mes matrices pour le remplissage de ces dernières. Voici donc deux fonctions très utiles :
Code:

odd   <-   function(p) (p %% 2)==1 # odd = impair
even   <-   function(p) (p %% 2)==0 # even = pair

qu'on peut utiliser de cette manière :
Code:

b <- 8
A <- array(NA,c(b,3))
A[odd(1:b),] <- "impair"
A[even(1:b),] <- "pair"

Attention toutefois à n'utiliser ces fonctions qu'avec des entiers à cause des arrondis de calcul :
Code:

> odd(1)
[1] TRUE

> odd(1+10^(-4))
[1] FALSE

> odd(1+10^(-40))
[1] TRUE
flbresson
flbresson

Messages : 360
Date d'inscription : 19/11/2009
Age : 44
Localisation : Clermont-Ferrand

http://sites.google.com/site/flbresson2/

Revenir en haut Aller en bas

Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum