Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

For Routine to Map Routine

  • To: mathgroup at smc.vnet.net
  • Subject: [mg70400] For Routine to Map Routine
  • From: Benedetto Bongiorno <bbongiorno at attglobal.net>
  • Date: Sun, 15 Oct 2006 00:19:53 -0400 (EDT)

To All,

Dimensions of ans01 is 2185850 by 5.
I am looking to convert my For routine to the more efficient Map routine
 
n=Length[ans01]
fo={};

For[i=1, i<n, i++,
If[ans01[[i,1]] == ans01[[i+1,1]],
AppendTo[fo, ans01[[1]]]];

I tried
Map[If[#[[1]] == #[[1]],#]&,ans01];

But it does not work.

Thank you

Ben



  • Prev by Date: a fault in the Factor[] function for polynomials?
  • Next by Date: Re: how to sum lists of unequal length?
  • Previous by thread: Re: a fault in the Factor[] function for polynomials?
  • Next by thread: Re: For Routine to Map Routine