Re: Fast calculation of pair correlation function
- To: mathgroup at smc.vnet.net
 - Subject: [mg98652] Re: Fast calculation of pair correlation function
 - From: Antti Penttilä@smc.vnet.net
 - Date: Wed, 15 Apr 2009 05:00:50 -0400 (EDT)
 - Organization: University of Helsinki
 - References: <gs1ntd$7ij$1@smc.vnet.net>
 
Hi again,
My previous post contained erroneous thinking from me - with function 
Outer all the distances will be computed twice, between points (a,b) but 
also between (b,a). Better solution would be to use e.g.
rlist = Flatten[Table[Map[Norm, Drop[data,i]-Drop[data,-i]], {i, n-1}]]
with 5 000 points it takes about 56 secs.
Antti