Skip to main content
Mathematica

Return to Answer

added 2 characters in body
Source Link
Dr. belisarius
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}]; 

rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a <= rr <= b]}, rr]

w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}];
rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a <= rr <= b]}, rr]

w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}]; 

rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a <= rr <= b]}, rr]
added 2 characters in body
Source Link
Dr. belisarius
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}];
rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a <<= rr <<= b]}, rr]

w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}];
rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a < rr < b]}, rr]

w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}];
rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a <= rr <= b]}, rr]
Source Link
Dr. belisarius
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456

w = RandomReal[{0, 1}, 10];
b = RandomReal[{0.5, 1}, 10];
a = RandomReal[{0, .5}];
rr = Array[r, 10];
Minimize[{w.Log@rr, Thread[a < rr < b]}, rr]