# NOT RUN {
#Generate 1000 random values from an Uniform distribution U(0, 0.25).
x<-runif(1000, 0, 0.25)
#Set data class to "print".
class(x)<-"print"
#Apply the GSAfisher.print function to this data vector.
GSAfisher(x)
# }
Run the code above in your browser using DataLab