Services & ResourcesWolfram ForumsMathGroup Archive

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

For Loop problem

• To: mathgroup at smc.vnet.net
• Subject: [mg65595] For Loop problem
• From: Rob <rob at piovere.com>
• Date: Mon, 10 Apr 2006 02:31:15 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

I've got to manipulate some signed 12bit integer numbers from a file and
apparently Mathematica only handles 8 and 16 bit signed numbers
(probably for a very good reason). So I bring them in as 16 bits (and
they're stored that way with a leading zero nibble) and then I have to
do the following to make sense of them.  I really don't know why this
code works but it does.

For[i = 1, i < Length[y], i++, If[y[[i]] > 2048, y[[i]] =
     y[[i]] - 2048, y[[i]] = y[[i]] + 2048]];

So to my question: once again I had to resort to a For loop to pull this
off and I know this is a no-no.  But I'm so clueless about Mathematica
that I've never come up with a more sophisticated method after a year or
so of thinking about it. Can someone help (as they usually can)?

Thanks, Rob

• Follow-Ups:
  • Re: For Loop problem
    • From: bsyehuda@gmail.com
  • Re: For Loop problem
    • From: "Carl K. Woll" <carlw@wolfram.com>
  • Re: For Loop problem
    • From: János <janos.lobb@yale.edu>