## Copyright (C) 2010--2011 Marius Hofert and Martin Maechler ## ## This program is free software; you can redistribute it and/or modify it under ## the terms of the GNU General Public License as published by the Free Software ## Foundation; either version 3 of the License, or (at your option) any later ## version. ## ## This program is distributed in the hope that it will be useful, but WITHOUT ## ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS ## FOR A PARTICULAR PURPOSE. See the GNU General Public License for more ## details. ## ## You should have received a copy of the GNU General Public License along with ## this program; if not, see . useDynLib(nacopula, .registration=TRUE) ## Now 'Depend' on stats4 and bbmle : ##importFrom("stats4", mle) importMethodsFrom("stats4", coef,confint, logLik, AIC, BIC, summary, plot, profile) importFrom("gsl", debye_1) importFrom("ADGofTest", ad.test) importFrom("stabledist", dstable) exportClasses("acopula", "nacopula", "outer_nacopula", "interval", "maybeInterval" ) ## Generics, functions and acopula - family objects defined in this package export("copAMH", "copClayton", "copFrank", "copGumbel", "copJoe" ,"getAcop" ,"cacopula", "dnacopula", "pnacopula", "rnacopula" ,"rnchild" ## estimation ## ,"coeffG", "polyG", "polyJ", "signFF" ,"initOpt" ,"beta.", "beta.hat", "pobs" ,"ebeta", "etau", "emde", "dDiag", "edmle", "emle", "enacopula" ## goodness-of-fit ,"K", "gtrafouni", "rtrafo", "htrafo", "gnacopula" ## misc ,"onacopula", "onacopulaL", "nesdepth" ,"polynEval" ,"printNacopula" ,"interval" ,"opower" ,"prob" ,"timing" ## Should we provide these in a separate (very small) R package ? ,"sinc", "A..Z" ,"rstable1" ,"retstable", "retstableR" ,"dSibuya", "pSibuya", "dsumSibuya", "rSibuya", "rSibuyaR" ,"rlog", "rlogR", "rF01Frank", "rF01Joe", "rFFrank", "rFJoe" ##,"logm1expm" ,"polylog", "Bernoulli", "Bernoulli.all", "Eulerian", "Stirling1", "Stirling2", "Eulerian.all", "Stirling1.all", "Stirling2.all" ,"psiDabsMC" ,"setTheta" ,"tauAMH" ,"allComp" # <- maybe keep private ? ,"safeUroot" ,"splom2" ) exportMethods(## for both own and "other" generics: "prob", "%in%", "dim", "format", "show" ) if(getRversion() < "2.12") export("adjustcolor")