Shapiro-Wilk test

Hi,

I want do a shapiro-wilk test with R, so I use shapiro.test.

I have a problem I can see my result. I use capture.output (or as.vector or as.list) but it's impossible to have any result.

This is my script :

normal<-shapiro.test(log_LD50_reelle)
AllData\$normal<-as.list(normal)

I have an error message say I can put my result in this frame, so I do this:

x=c(0)
x\$normal<-as.list(normal)
attach(x)

But the HTML viewer show my frame "AllData".

How I can change my frame to see my Shapiro-Wilk test?

I haven't found this fonction or components in Pipeline Pilot or R object for Pipeline Pilot,it exist?

This test is very important for statistics.