[R] incomplete function output

[Randy Johnson [Contr]]

You can return a list of them all

root <- function(var)
{
    return(list(test1 = PP.test(var, lshort = T), 
                test2 = ...))
}

output <- root(var)

Then you can print them, save them, or whatever.
Or you could just print them out in the function

root <- function(var)
{
#---Phillips-Perron
print(PP.test(var, lshort = TRUE))
print(PP.test(var, lshort = FALSE))
.
.
.
}

Randy

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Randy Johnson [Contr.]
Laboratory of Genomic Diversity   |\
NCI Frederick   ___lll__/|   |\  ()
(301)846-1304    (_|||_)\|  ()
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

-----Original Message-----
From: r-help-bounces at stat.math.ethz.ch
[mailto:r-help-bounces at stat.math.ethz.ch] On Behalf Of bogdan romocea
Sent: Wednesday, October 13, 2004 1:20 PM
To: r-help at stat.math.ethz.ch
Subject: [R] incomplete function output

Dear R users,

I have a function (below) which encompasses several tests.
However, when I run it, only the output of the last test is
displayed. How can I ensure that the function root(var)
will run and display the output from all tests, and not
just the last one?

Thank you,
b.

root <- function(var)
{
#---Phillips-Perron
PP.test(var, lshort = TRUE) 
PP.test(var, lshort = FALSE) 

#---Augmented Dickey-Fuller 
adf.test(var, alternative = "stationary", k =
trunc((length(var)-1)^(1/3)))

#---KPSS
kpss.test(var, null = "Level", lshort = TRUE)
kpss.test(var, null = "Trend", lshort = FALSE)
}

______________________________________________
R-help at stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide!
http://www.R-project.org/posting-guide.html