Looking for an  fast dist implementation
where I could pass my own dist function to the "method" parameter
i.e.
mydistfun = function(x,y){
 return(ks.test(x,y)$p.value)   #some mystique implementation
}
wow = dist(data,method=mydistfun)
thanks
-- 
Witold Eryk Wolski