MathGroup Archive 1995

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

Search the Archive

Mesh


	A late entry in the interleaf speed contest.  The following
simple procedure was used with my klunky DX2-66 running under windows.


  v1={a,b,c,d,e,f,g};v2={A,B,C,D,E,F,G};

  MapThread[If[Random[Integer]==0,#1,#2]&,{v1,v2}]
  {a, B, C, D, e, F, G}

  Do[MapThread[If[Random[Integer]==0,#1,#2]&,{v1,v2}],{1000}]//Timing

  {4.833 Second, Null}

Don Darling



  • Prev by Date: Re: BUGGY Graphics
  • Next by Date: Re: Graphic Bugs
  • Previous by thread: Re: Declaring Variables as Real?
  • Next by thread: Transpose[{1,2}]