## Not run:
# data(afExp)
# ##before running this funtion, we need to find out "b1.txt" data file, and put it into the R workspace.
# functionall(system.file("data","b1.txt",package="DBGSA"),10,avelinkdis,"euclidean","distance",afExp,2000,10,"rand.txt","pvalue.txt")
# ## End(Not run)
Run the code above in your browser using DataLab