MathGroup Archive 2008

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

Search the Archive

FW: eliminate all the occurrences of "theta ->" and "lambda ->" THANK YOU

  • To: mathgroup at smc.vnet.net
  • Subject: [mg85603] FW: eliminate all the occurrences of "theta ->" and "lambda ->" THANK YOU
  • From: "Richard Hofler" <rhofler at bus.ucf.edu>
  • Date: Thu, 14 Feb 2008 18:49:27 -0500 (EST)

Hello All,

Thank you very much for your replies.   Eight (!) of you answered my
question and the  problem is solved.

Richard


_____________________________________________
From: Richard Hofler
Sent: Wednesday, February 13, 2008 10:29 AM
To: mathgroup at smc.vnet.net
Subject: [mg85603] eliminate all the occurrences of "theta ->" and "lambda ->"


Hello All,

I'm relatively new to Mathematica. Here's my problem.

I have this list that I generated from FindMaximum:

results = {{-5933.0186,{q*4.5785,l*1.0231}},
   {-5960.3876,{q*5.0002,l*1.0085}},
   {-5929.7166,{q*3.9758,l*1.0951}},
{-5929.4666,{q*3.9308,l*1.3277}},
{-5933.7226,{q*4.7088,l*1.1294}},
{-5928.0464,{q*3.6767,l*1.1019}}};

How do I eliminate all the occurrences of "q*" and "l*"
to transform it into this list?

{{4.5785,1.0231},{5.0002,1.0085},{3.9758,1.0951},
{3.9308,1.3277},{4.7088,1.1294},{3.6767,1.1019}}


BTW, I can evaluate this function

Take[Partition[Flatten[results],3],All,2;;3]

to get to this point:

{{q*4.5785,l*1.0231},{q*5.0002,l*1.0085},{q*3.9758,l*1.0951},{q*3.9308,l
*1.3277},{q*4.7088,l*1.1294},{q*3.6767,l*1.1019}}

$Version
6.0 for Microsoft Windows (32-bit) (June 19, 2007)

Thanks very much for any help that you may offer.
Richard


  • Prev by Date: Re: How should I start with mathematica?
  • Next by Date: Re: eliminate all the occurrences of "theta ->" and "lambda ->"
  • Previous by thread: Re: AD in Mathematica
  • Next by thread: From procedural to functional programming in Mathematica