La lettre l devant le apply correspond à ` list` Par défaut, les résultats sont également fournis sous forme d'une liste: maliste <- list(E1=rnorm(10), E2=1:10, E3=runif(10)) maliste ## $E1 ## [1] -1. 7984349 0. 6276849 0. 7310556 1. 1642278 -1. 0313113 0. 1958217 ## [7] -1. 9018991 -1. 8122020 -0. 3482781 -1. 2713203 ## ## $E2 ## [1] 1 2 3 4 5 6 7 8 9 10 ## $E3 ## [1] 0. 723830546 0. 838541188 0. 845484439 0. 039995958 0. 615807877 0. 917093245 ## [7] 0. 867372951 0. 224336368 0. 001643635 0. 081938347 lapply(maliste, mean) ## [1] -0. 5444656 ## [1] 5. 5 ## [1] 0. 5156045 Si on utilise une fonction qui nécessite des arguments, il faut les indiquer après la fonction, comme ici avec la fonction quantile() et l'argument probs. lapply(maliste, quantile, probs=c(0. 25, 0. Lapply sous r la publication. 75)) ## 25% 75% ## -1. 6666563 0. 5197191 ## 3. 25 7. 75 ## 0. 1175379 0. 8437486 On peut également obtenir les résultats sous la forme d'un vecteur en employant la fonction unlist() en amont: unlist(lapply(maliste, mean)) ## E1 E2 E3 ## -0.
Ces fonctions lapply, sapply, tapply et lapply permettent d' appliquer une fonction ( mean, par exemple, pour calculer une moyenne) sur des données, de façon itérative. Autrement dit, elles font la même chose qu'une boucle for(), tout en ayant une syntaxe concise, puisque ça se passe en une ligne de commande, et en étant plus rapide. Néanmoins, de mon côté, j'ai toujours eu des difficultés à les employer parce que je ne me souviens jamais laquelle utiliser selon: la structure de mes données d'entrées (data frame, vecteur, liste), ce que je veux faire (appliquer une fonction par sous-groupe de données, appliquer une fonction sur les marges (sur chaque ligne ou chaque colonne) d'un data frame), ce que je souhaite obtenir en sortie (un vecteur, une liste). Sapply - Groupe des utilisateurs du logiciel R. Savoir utiliser ces fonctions peut cependant s'avérer très utile. Alors, j'ai fini par me faire un petit mémo, que je vous partage ici. Elle réalise une boucle sur une structure de type liste, en appliquant une fonction sur chaque élément de cette liste.
Peut-être que cela vous donnera des idées de résolutions... Sinon, s'il vous est possible de mettre un (court) extrait de votre jeu de données, cela rendrait les choses peut-être plus claires. Cela dit, peut-être que d'autres membres du forum connaissent mieux que moi les fonctions que vous utilisez et seront plus à même de vous apporter leur aide. Bonne continuation:) Message par matthieu faron » 21 Fév 2011, 16:18 Merci à vous deux pour votre aide. Lapply sous l'occupation. à Maxime: malheureusement quand j'enlève substitute titre devient un vecteur et la fonction text imprime toutes les combinaisons possibles de la modalité de la variable les unes sur les autres. Par exemple Overall survival: colon et Overall survival: rectum imprimé l'un sur l'autre au lieu de "primsite". à Aline: J'ai bien essayé votre exemple, mais chez moi le titre s'affiche avec la valeur de la variable (généré par runif()) et non pas avec son nom "X1". Encore merci Message par matthieu faron » 21 Fév 2011, 16:35 Merci, C'est mieux car maintenant le titre est de la forme: [[X10L]] Avec je pense 10 qui représente la position de la variable en question dans la liste (ce qui permet de la repérer!
Tout le code que tu as utilisé peut-être simplifier par le code suivant: Code: Tout sélectionner numero <- meric(gsub("\\D", "", deparse(substitute(var)), perl=T)) Maxime Message par matthieu faron » 22 Fév 2011, 10:06 J'avais donc mal compris le code que tu m'a donné. Maintenant tout marche parfaitement, Retourner vers « Questions en cours » Qui est en ligne Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 0 invité
La famille des fonctions apply est intégrée dans le package base déjà chargé en mémoire dans RStudio. Ces fonctions évitent d'avoir recours aux boucles. Dans ce TP, nous aborderons uniquement les fonctions apply, lapply et tapply. Mais, il en existe d'autres telles que sapply, mapply, vapply, etc. Fonction apply La fonction apply est la fonction de base des fonctions de cette famille. Elle est utile pour appliquer une fonction sur chaque colonne d'une matrice. L'argument MARGIN permet de préciser si on veut appliquer la fonction mean pour chaque ligne ou chaque colonne. Ici l'objet X convertit le data frame en matrice, c'est pourquoi la fonction apply renvoie que des vecteurs de type character. Titre d'un graphique appelé par fonction et lapply - Groupe des utilisateurs du logiciel R. apply ( X = iris, MARGIN = 2, FUN = class) ## Species ## "character" "character" "character" "character" "character" apply ( X = iris[, 1: 4], MARGIN = 2, FUN = mean) ## ## 5. 843333 3. 057333 3. 758000 1. 199333 Fonction lapply La fonction lapply se construit de la même façon que la fonction apply à l'exception que le résultat renvoyé est une liste La fonction lapply prend en entrée une liste, un vecteur ou un data frame / matrice contrairement à la fonction apply.
skytimetravel.net, 2024