0
$\begingroup$

I would like to solve the following set of inequalities in Mathematica.

$$m \geq 1$$

$$n \geq 1$$

$$d > 5$$

$$d - \frac{m}{2}(d-2) - n(d-1) > 0 $$

I get no solutions by hand. I'd like to check this answer using Mathematica.

How do I do this in Mathemtica?

Improve this question
$\endgroup$
3
  • 2
    $\begingroup$ Why do you need Mathematica for this? Obviously, the second and third term are negative and smallest (in magnitude) for m=1 and n=1. Even then the result is -1/2 d + 2 which is <0. $\endgroup$
    – Felix
    Commented Feb 24, 2017 at 1:39
  • $\begingroup$ Reduce[{m >= 1, n >= 1, d > 5, d - m/2 (d - 2) - n (d - 1) > 0}] returns False indicating that the conditions are inconsistent. $\endgroup$
    – Bob Hanlon
    Commented Feb 24, 2017 at 6:36
  • $\begingroup$ @ felix . I have it by hand, but I want to check my answer using all possible means. $\endgroup$
    – nightmarish
    Commented Feb 24, 2017 at 11:19

2 Answers 2

Reset to default
2
$\begingroup$

Reduce gives False instantaneously and FindInstance gives an empty list. So your surmise of no solution seems to be correct.

Reduce[{d - m/2 (d - 2) - n (d - 1) > 0, m >= 1, n >= 1, 
      d > 5}, {m, n, d}]

    (* False *)

FindInstance[{d - m/2 (d - 2) - n (d - 1) > 0, m >= 1, n >= 1,
   d > 5}, {m, n, d}]

(* {} *)
Improve this answer
$\endgroup$
1
$\begingroup$

@Felix 's response is best but if you had to do it with Mathematica:

Maximize[{m + n - d (m/2 + n), m >= 1 && n >= 1 && d > 5}, {m, n, d}]

Maximize::wksol: Warning: there is no maximum in the region in which the objective function is defined and the constraints are satisfied; a result on the boundary will be returned.

{-(11/2), {m -> 1, n -> 1, d -> 5}}
Improve this answer
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.