Fonctions pair et impair
Page 1 sur 1
Fonctions pair et impair
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 :
qu'on peut utiliser de cette manière :
Attention toutefois à n'utiliser ces fonctions qu'avec des entiers à cause des arrondis de calcul :
- 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
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|