[Date Index] [Thread Index] [Author Index]

Re: [Mathematica] special iterator

• To: mathgroup at smc.vnet.net
• Subject: [mg120640] Re: [Mathematica] special iterator
• From: lorenzo <lorenzo_ktm at yahoo.it>
• Date: Sun, 31 Jul 2011 23:37:09 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Thanks for all the answers,

I used Delete, apparently it returns a list without the j-th element and the original list is not affected by any side effect:

wi = Function[{x, j, func, data}, 
   Product[func[x - Delete[data, j][[i]]],  
   {i, 1, Length[data] - 1}]];