Résultat sous forme d'une fraction irréductible

[Remy Duchemin]

Bonjour,

Je me pose cette question depuis un petit moment. Savez-vous comment faire pour obtenir des résultats sous forme de fraction irréductible ??
Exemple :

Code : Tout sélectionner

k=seq(0,10,1)
Np=120
N=160
n=10
choose(Np,k)*choose(N-Np,n-k)/choose(N,n)


Merci par avance

[Renaud Lancelot]

Voir par exemple le package FRACTION (je pense qu'il y en a d'autres):

Code : Tout sélectionner

> install.packages("FRACTION")
Installing package into ‘C:/R/R_LIBS’
(as ‘lib’ is unspecified)
essai de l'URL 'http://cran.rstudio.com/bin/windows/contrib/3.0/FRACTION_1.0.zip'
Content type 'application/zip' length 17424 bytes (17 Kb)
URL ouverte
downloaded 17 Kb

le package ‘FRACTION’ a été décompressé et les sommes MD5 ont été vérifiées avec succés

Les packages binaires téléchargés sont dans
        c:\Temp\RtmpUNRKe4\downloaded_packages
> library(FRACTION)
> fra(2/6)
[1] "1 / 3"