Gabor Grothendieck <[EMAIL PROTECTED]> a écrit : > Its a FAQ
Oups... Sorry for that. Just to close the topic : cleanProg <- function(name,tolerance){ if(length(findGlobals(get(name),FALSE)$variables) > tolerance){ cat("More than",tolerance,"global variable(s) in ",name,"\a\n") } } cleanProg(fun,0) ---------------------------------------------------------------- Ce message a ete envoye par IMP, grace a l'Universite Paris 10 Nanterre ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.