MathGroup Archive 1995

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

Search the Archive

How use the Union function (MMA v.2,2 on PC )?

  • To: mathgroup at christensen.cybernetics.net
  • Subject: [mg883] How use the Union function (MMA v.2,2 on PC )?
  • From: ptaszyns at uci.agh.edu.pl (Boguslaw Ptaszynski)
  • Date: Fri, 28 Apr 1995 00:40:44 -0400
  • Organization: University of Mining & Metallurgy

Dear Mathgroup

I have wanted to use the Union function to remove repeated elements
in the following problem :

Clear[pe, pierw, llk, x, i, imax, k, u, fun];
pe=100; fun=Tan[x]+(2/pe)*x;
pierw=Table[FindRoot[fun==0, {x, k}], {k, 3, 10, 0.5}];
imax=Length[pierw]; u=Flatten[pierw]; llk=Table[N[u[[i,2]],7], {i,1,imax}];
pierw=Union[llk]

but I was unable to get it. Why ?
Can someone tell me how to make it ?

Any help in this area would be appriciated 

Boguslaw Ptaszynski
[ e-mail : ptaszyns at galaxy.uci.agh.edu.pl ]



  • Prev by Date: Re: ODE solver
  • Next by Date: Re: help w/ SphericalPlot3D
  • Previous by thread: Options in Mathematica
  • Next by thread: Re: How use the Union function (MMA v.2,2 on PC )?