Re: Function research
- To: mathgroup at smc.vnet.net
- Subject: [mg105915] Re: [mg105913] Function research
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Fri, 25 Dec 2009 00:34:36 -0500 (EST)
- Reply-to: hanlonr at cox.net
f[x_] = 1/(x^2 - 1);
excl = x /. Solve[Denominator[f[x]] == 0, x]
{-1,1}
Plot[f[x], {x, -4, 4},
Exclusions -> Thread[x == excl],
ExclusionsStyle ->
Directive[Red, AbsoluteDashing[{10, 10}]],
PlotStyle -> Directive[Blue, Thick],
PlotRange -> {-5, 5}]
Maximize[{f[x], Abs[x] < 1}, x]
{-1, {x -> 0}}
Quiet[Minimize[{f[x], #}, x] & /@ {x < -1, x > 1}]
{{0, {x -> -Infinity}}, {0, {x -> Infinity}}}
Limit[f[x], x -> #] & /@ {-Infinity, Infinity}
{0,0}
Bob Hanlon
---- Arnold <sender999ster at gmail.com> wrote:
=============
How means Mathematica 5.2 it is possible to discover a range of definition of function and a function range?
Example: 1 / (x^2-1).
Thanks.