should do the trick as @Andrie pointed out. It will return you a list with an element for each column in the dataframe
library(tseries)
ht <- adf.test(vector, alternative="stationary", k=0)
ht <- adf.test(dataframe, alternative="stationary", k=0)
pvalues=ldply(ht, function(x){ x$p.value })
This post was edited by Raji Reddy A at September 22, 2020 11:35 AM IST
ht <- lapply(dataframe, adf.test, alternative="stationary", k=0)
ht <- lapply(dataframe, adf.test, alternative="stationary", k=0)
should do the trick as @Andrie pointed out. It will return you a list with an element for each column in the dataframe