Thank you very much for your help again! Yes, I do understand your point and it is quite well making sense.
I have downloaded your file, copied and pasted into my Mathematica 7 notepad and executed.
But instead, the status is in the running mode for a quite long time up to now.
Does this mean that I need to upgrade my Mathematica 7 into 8 to perform this task?
In addition, may I ask you for the output for this code if possible since I cannot run this with my
Mathematica 7 version but I really need the output quite much..? Thank you very much, really!