1. Grâce à ce formulaire vous pouvez proposer une astuce ou un script sur R.
  2. Votre script doit pouvoir être lancé en l'état. Veuillez penser à :
    • inclure le chargement des "library" nécessaires
    • construire un petit jeu de données si besoin est.
    • commenter les lignes de codes pour en faciliter la compréhension.
  3. Le titre de votre script ou astuce doit être clair et explicite.
  4. Pensez à mettre votre code entre les balises [R] et [/R]; Pour cela, vous pouvez utiliser le bouton

Vous pouvez utiliser vos comptes Facebook, twitter ou google pour vous identifer (google est compatible yahoo, openID...)
L'ideal étant de vous connecter si vous avez un compte utilisateur, ou faire une demande de compte utilisateur si vous n'en avez pas encore.
Créer un compte va vous permettre de pouvoir éditer vos codes et de mettre en avant votre site internet.
Sinon vous pouvez soumettre anonymement en remplissant les champs ci-après.







Choisissez les catégories correspondantes à votre Code:

  • algorithmique
  • Analyse de survie
  • base indispensable
  • bayésien
  • configuration de R
  • exportation de données
  • fonctions utiles
  • graphique
  • importation de données
  • inférence
  • manipulation de données
  • message d'erreur
  • modélisation
  • Non classé
  • optimisation
  • planification
  • programmer avec R
  • regression linéaire
  • Test
  • Transformation de données


Comment faire des comptages dans un data.frame ? apply, lapply, sapply, which

0
dans fonctions utiles

Les fonctions de la famille apply() et la fonction which() peuvent permettre de compter les éléments identiques, négatifs, positifs ou encore supérieurs ou inférieurs à une certaine valeur dans un data.frame.

 
iris
# iris, un tableau de données
m <- matrix(data=cbind(rnorm(30, 0), rnorm(30, 2), rnorm(30, 5)), nrow=30, ncol=3)
# m, une matrice de données 
 


Calculer le nombre d’éléments identiques :

 
### Dans un tableau :
lapply (iris, function(x) length(unique(x))) # retourne une liste
sapply (iris, function(x) length(unique(x))) # retourne un vecteur numérique
### Dans une matrice :
apply (m, 2,function(x) length(unique(x))) #retourne des entiers 
 


Calculer le nombre d’éléments supérieurs ou inférieur à une certaine valeur :

 
### Dans un tableau :
iris2 <- as.matrix(iris) # On convertie la base de données en matrice
iris2[,1] <- as.numeric(iris2[,1]) # On convertie la colonne en données numériques
length(which(iris2[,1]>5)) # On obtient le nombre sépales dont la longueur est supérieur à 5
### Dans une matrice :
apply(m, 2, function(x) length(x[x<0])) # Nombre d’éléments négatifs
apply(m, 2, function(x) length(x[x > 1.5])) # Nombre d’éléments supérieur à 1,5
 
 

Proposé par Helene F.

Ce script vous à rendu service? remerciez l'auteur en votant ici:
- ça ne sert à rien -- c\'est interessant - (score de +1 sur 1 votes)
Loading ... Loading ...

Poster un commentaire


Votre email ne seras jamais communiqué champs requis désigné par une *

*
*


× un = 3

Formation logiciel R