Quand il s'agit d'une variable quantitative, le minimum, le maximum, les quartiles et la moyenne sont affichés. Par contre, pour un facteur, le nombre d'observations pour les six premiers niveaux de la variable qualitative est donné: summary(X) # Min. 1st Qu. Median Mean 3rd Qu. Max. # 10. 00 10. 00 12. 00 11. 78 13. 00 13. [dplyr] Créer une variable avec une condition - R. 00 De manière évidente, il s'agit bien ici d'une variable quantitative. Le passage en facteur se fait simplement en utilisant la fonction factor: Xqual <- factor(X) Xqual # [1] 10 10 10 12 12 13 13 13 13 # Levels: 10 12 13 summary(Xqual) # 10 12 13 # 3 2 4 L'affichage d'un facteur permet clairement de le distinguer d'un numérique par la présence des niveaux ( levels) en fin d'affichage. Il en est de même pour le résumé fourni par summary. Conversion d'un facteur en numérique Le passage de facteur en numérique se fait en deux étapes. On transforme le facteur en vecteur de type caractère, puis on transforme ce dernier en numérique. Si l'on transforme directement le facteur en numérique, les niveaux sont recodés dans l'ordre (le premier niveau sera 1, le deuxième 2, etc. ): ## conversion avec recodage des modalités meric(Xqual) # [1] 1 1 1 2 2 3 3 3 3 ## conversion sans recodage des modalités: 2 étapes provisoire <- aracter(Xqual) provisoire # [1] "10" "10" "10" "12" "12" "13" "13" "13" "13" meric(provisoire) # [1] 10 10 10 12 12 13 13 13 13 En résumé Le facteur est un objet permettant de représenter au mieux une variable qualitative.
> v <- c ( 2, 3) > 4 * v [ 1] 8 12 Opérations algébriques [ modifier | modifier le wikicode] L'opérateur%*% (pourcent-astérisque-pourcent) effectue un produit scalaire, en supposant la base orthonormale: > u <- c ( 1, 2) > v <- c ( 3, -1) > u%*% v [, 1] [ 1, ] 1 Notons que le résultat est une matrice d'une seule composante (un tableau d'une seule case). On peut extraire le résultat en prenant l'élément (1, 1) de la matrice, ou bien en faisant la somme cumulée de ce vecteur: > a <- u%*% v [ 1] "matrix" "array" "structure" "vector" > a [ 1, 1] [ 1] 1 > cumsum ( a) On peut ainsi calculer la norme du vecteur par > sqrt ( u%*% u) [ 1, ] 2. 236068 Vecteur comme suite de valeurs [ modifier | modifier le wikicode] Le vecteur peut aussi représenter une suite u 1, u 2, …, u n.
Toutes les lister ici serait bien trop long! Générer des séquences: Il est courant que l'on souhaite générer des vecteurs de nombres. Il existe différentes méthodes en R pour cela, en particulier pour générer des vecteurs selon des lois de probabilités usuelles. Voyons quelques fonctions intéressantes: Générer une séquence par pas: x = seq( 1, 100, by = 2) Générer un vecteur uniforme de taille n: n = 100 x = rep( 1, n) x = rep( 1 /n, n) Tester le type d'un objet Il existe en R toute une famille de fonctions qui nous permet de savoir si un objet est bien d'un type donné ou non. Ces fonctions renvoient un booléen ( TRUE ou FALSE) selon le type de l'objet en question. Ecrire une fonction en R - Création fonction - Tuto R. Tester un integer: eger( 10L) eger( "Washington") Tester un double: ( 3. 14) ( "Washington") Tester un complex: plex( 3 + 2i) plex( "Washington") Tester un logical: is. logical( TRUE) is. logical( "Washington") Tester un character: aracter( "Washington") aracter( 12) Tester un numeric (double ou integer): meric( 3L) meric( 3.
1- Créer un tableau de type Lorsque plusieurs paramètres sont susceptibles d'agir sur l'obtention de résultats, il faut faire des Il s'agit de tableaux à n colonnes de même taille ou non. Ces tableaux sont ceux que l'on charge par défaut avec la fonction ().
factorielle <- function ( n) { if ( n == 1) resultat <- 1 # arrêt de la récursion else resultat <- factorielle ( n -1) * n # appel récursif return ( resultat)} Mais nous remarquons que cette fonction ne s'applique qu'aux scalaires, en raison de la présence du test if (n == 1): la condition if ne s'applique que sur un scalaire booléen. On peut modifier le code pour le rendre exécutable sur les vecteurs: indice <- ( n == 1) if ( all ( indice)) return ( n) # arrêt de la récursion n [! indice] <- n [! indice] * factorielle ( n [! indice] - 1) # appel récursif return ( n)} Comme souvent, on crée un vecteur de booléens appelé indice. Si toutes les valeurs sont à « 1 », alors on retourne le vecteur lui-même (puisque 1! = 1); c'est l'arrêt de la récursion. Créer fonction r style. Sinon, on extraie le sous-vecteur dont les valeurs ne sont pas « 1 », et l'on applique la récursion. On peut le tester avec par exemple > x = c ( 1: 5, 1: 5) > print ( x) [ 1] 1 2 3 4 5 1 2 3 4 5 > factorielle ( x) [ 1] 1 2 6 24 120 1 2 6 24 120
Sitemap | wwropasx.ru, 2024