Problème avec une fonction
Fermé
mb42
Messages postés
432
Date d'inscription
vendredi 17 octobre 2008
Statut
Membre
Dernière intervention
14 janvier 2014
-
12 nov. 2012 à 12:29
mb42 Messages postés 432 Date d'inscription vendredi 17 octobre 2008 Statut Membre Dernière intervention 14 janvier 2014 - 12 nov. 2012 à 14:25
mb42 Messages postés 432 Date d'inscription vendredi 17 octobre 2008 Statut Membre Dernière intervention 14 janvier 2014 - 12 nov. 2012 à 14:25
A voir également:
- Problème avec une fonction
- Fonction si et - Guide
- Fonction moyenne excel - Guide
- Fonction somme excel - Guide
- Snapchat ils m'ont ajouté par la fonction recherche - Forum Snapchat
- Comment colorer une cellule excel en fonction du contenu d'une autre cellule ✓ - Forum Excel
2 réponses
mb42
Messages postés
432
Date d'inscription
vendredi 17 octobre 2008
Statut
Membre
Dernière intervention
14 janvier 2014
7
12 nov. 2012 à 13:43
12 nov. 2012 à 13:43
pour bien resoudre cette fonction on doit diviser les problèmes
en premier lieu :
l'appel au nom et prenom se fait par :
print( "taper le nom" )
nom <- scan(nmax=1)
print( "taper le prenom" )
prenom <- scan(nmax=1)
print( "taper la date de naissance" )
dateNaissance <- ........ ICI le problème
..ici déclarer variable age
l'affichage finale se fait par
paste('Bonjour je m\'appelle', nom, 'et j\'ai', age, 'ans', sep=' ')
la declaration de fonction se fait par
en premier lieu :
l'appel au nom et prenom se fait par :
print( "taper le nom" )
nom <- scan(nmax=1)
print( "taper le prenom" )
prenom <- scan(nmax=1)
print( "taper la date de naissance" )
dateNaissance <- ........ ICI le problème
..ici déclarer variable age
l'affichage finale se fait par
paste('Bonjour je m\'appelle', nom, 'et j\'ai', age, 'ans', sep=' ')
la declaration de fonction se fait par
affichage<-function() { print( "taper le nom" ) nom <- scan(nmax=1) print( "taper le prenom" ) prenom <- scan(nmax=1) print( "taper la date de naissance" ) dateNaissance <- ........ ICI le problème ..ici déclarer variable age // récupérer la date système // faire de boucle for pour calculer l'age ( comparer le mois et l'année entre date de naissance saisie et date système paste('Bonjour je m\'appelle', nom, 'et j\'ai', age, 'ans', sep=' ') }
mb42
Messages postés
432
Date d'inscription
vendredi 17 octobre 2008
Statut
Membre
Dernière intervention
14 janvier 2014
7
12 nov. 2012 à 14:25
12 nov. 2012 à 14:25
je trouve une fonction qui permet de calculer l'age mais en .net
cette fonction nécessite la récupération de date système ( mois , jours , année)
donc le problème est de trouver l'équivalent de cette fonction mais en R langage
cette fonction nécessite la récupération de date système ( mois , jours , année)
Protected Sub calcul_age() Dim datetimenow = DateTime.Now Dim datedenaissance = CDate(TbDn.Text) Dim age As Integer age = CInt(Now.Year - datedenaissance.Year) If (datedenaissance.Month > Now.Month) Then age = age - 1 End If If ((datedenaissance.Month = Now.Month) And (datedenaissance.Day > Now.Day)) Then age = age - 1 End If Me.Label3.Text = " Age : " & age & " ans" End Sub
donc le problème est de trouver l'équivalent de cette fonction mais en R langage