Re: simple vactor magitude question
- To: mathgroup at smc.vnet.net
- Subject: [mg43802] Re: simple vactor magitude question
- From: Bill Rowe <readnewscix at mail.earthlink.net>
- Date: Mon, 6 Oct 2003 02:07:54 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
On 10/4/03 at 2:05 AM, ZZNHTFKGIAIT at spammotel.com (Tom R.) wrote:
> This should do it: Apply[Plus, Table[p[[i]] i, {i, 0, Length[p] - 1}]]
This works after a fashion, but isn't a good idea. Array indices in Mathematica start with 1 not 0. So, p[[0]] doesn't exist. No error is generated in this case since 0 times any thing is 0. A method that would sum *all* of the elements of p would be
Sum[p[[n]]*n, {n, Length@p}]
If I were to make a new list g = Most@Rest@p, i.e., discarding the first and last elements of p then
Sum[g[[n]], {n Length@g}]
will give the same result as your code above
To reply via email subtract one hundred and nine