Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2012

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

Search the Archive

Problem finding maximum

  • To: mathgroup at smc.vnet.net
  • Subject: [mg127578] Problem finding maximum
  • From: Cisco Lane <travlorf at yahoo.com>
  • Date: Sat, 4 Aug 2012 21:49:15 -0400 (EDT)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-newout@smc.vnet.net
  • Delivered-to: mathgroup-newsend@smc.vnet.net

I cannot seem to find the corrrect maximum for the  absolute value of the following function in 0<=x<=aa1

aa1 = .7481

f[x_, a_] = (a^3 - 6 x - a^2 (4 + x) + a (2 + 12 x - 4 x^2))/(8 a)

For example, FindMaximum[{Abs[f[x, aa1]], 0 <= x <= aa1}, x] gives {0.0317268, {x -> 0.7481}}

The correct answer is at x=0, where Abs[f[0,aa1]]=0.0540933 but I have tried every maximization function I can think of and nothing will give me the correct answer. Can anyone help?



  • Prev by Date: Re: Evaluation of boolean functions in Mathematica 8
  • Next by Date: Re: Strange runtime error in Compiled function
  • Previous by thread: Re: PDF.exe inside Mathematica.app on OS X
  • Next by thread: Re: Problem finding maximum