unit root command does not show summary in for loop.

[equipoteconomica]

I build this code using library urca which is a library with unit root test

library(tseries)
library(urca)
y1<-cumsum(rnorm(500))
opt<-c("trend","drift","none")
for (i in opt) {
  print(i)
  y1.adf<-ur.df(y1,type=i,selectlags = "AIC")
  summary(y1.adf)
}

It is supposed to after summary command it has to show a summary table but it does not show nothing and R does not show any error message, what am I doing wrong?

pd: opt is a list with the options trend, drift and none which are parameters in ur.df( ... type="trend"... ) and so on.

[Flm]

try this:
print(summary(y1.adf))

[equipoteconomica]

thanks my friend

d.