[R] test for arima coef's significancy

[STOLIAROFF VINCENT]

Dear sirs, 

I would like to know if there is a function to compute the pvalue for the
significancy of arima coef in an arima object created by 
the arima function.

I have written this one:

pvalueArima<-function(x,arima)
{
t<-(arima$coef)/(diag(arima$var.coef)^0.5)
df<-length(x)-length(arima$coef)
1-pt(t,df)
}

Has somebody already implemented something equivalent ?

thank you for your help and comments

Vincent S.


*************************************************************************
Ce message et toutes les pieces jointes (ci-apres le "message") sont
confidentiels et etablis a l'intention exclusive de ses destinataires.
Toute utilisation ou diffusion non autorisee est interdite. 
Tout message electronique est susceptible d'alteration. 
SG Asset Management et ses filiales declinent toute responsabilite au titre
de ce message s'il a ete altere, deforme ou falsifie.

Découvrez l'offre et les services de SG Asset Management sur le site
www.sgam.fr 

				********

This message and any attachments (the "message") are confide...{{dropped}}