Voir le contenu d'une fonction développée dans un package

Bonjour,
Je voudrais connaître le contenu exact d'une fonction développée dans un package et pouvoir ainsi visualiser concrètement le code. Comment faire?
Merci

Bonjour,

Il y a plusieurs méthodes.
Je te donne un petit exemple que j'ai justement en magasin:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
> library(MASS)

> methods(print)
## supprimé
[124] print.latex                              
[125] print.Latex*                             
[126] print.lda*                               
[127] print.ldBands                            
## supprimé
   Non-visible functions are asterisked

> print.lda     ## Ne doit pas fonctionner
Erreur : objet "print.lda" non trouvé

> getAnywhere(print.lda)        ## Première métode
A single object matching 'print.lda' was found
It was found in the following places
  registered S3 method for print from namespace MASS
  namespace:MASS
with value

function (x, ...) 
{
    ## Supprimé
    if (length(svd) > 1) {
        cat("\nProportion of trace:\n")
        print(round(svd^2/sum(svd^2), 4), ...)
    }
    invisible(x)
}
<environment: namespace:MASS>

> MASS:::print.lda      ## Seconde méthode
function (x, ...) 
{
    ## Supprimé
    svd <- x$svd
    names(svd) <- dimnames(x$scaling)[[2]]
    if (length(svd) > 1) {
        cat("\nProportion of trace:\n")
        print(round(svd^2/sum(svd^2), 4), ...)
    }
    invisible(x)
}
<environment: namespace:MASS>

(ici je voulais savoir comment il calculaient la "Proportion of trace")

Bonjour,
Merci c'est exactement ça.
:king: