## 12915 Reputation

8 years, 351 days

## A difficult multiple integral...

Maple

Compute the following multiple integral exactly and/or with 10 correct significant digits

Int(  exp( - add(x[i],i=1..10)^3),  seq(x[i]=0..1, i=1..10) );

The problem is suggested by a previous post.

## The "Happy Ages" problem...

Maple

This is not actually a question, but an interesting problem found in the recent book (2nd edition, 2015):
Mathematica®: A Problem-Centered Approach
by  Hazrat Roozbeh
Springer

I hope that you will enjoy the problem too.

Define the functions f, h : N --> N by
f(n) = the sum of the squares of the digits of n; e.g. f(25) = 2^2 + 5^2 = 29.
h(n) = min {f(n), f(f(n)), f(f(f(n))), ... };  e.g. h(7)  = min{49,97,130,10,1} = 1.

A natural number n is happy if h(n) = 1.
Find all the happy ages, i.e., happy numbers up to 100.
Conclude that happy ages are mostly before one gets a job or after retirement!

## Strange dsolve bug for a simple ODE...

Maple 2015

(Maple 2015)

For the simple ODE with initial condition
dsolve({ diff(y(t),t) = y(t)^2 - y(t)^3, y(0) = 1/10 }, y(t));

dsolve produces two different answers, almost randomly (even after restart or after closing Maple and reloading the worksheet). Namely:

(1)

(2)

or

(2')

but this simplifies to (2), so it's not a "true" bug.

Notice that (2) is correct but (1) is incorrect even for t=0 (the initial condition!):

evalf(eval(RootOf(-ln(_Z)*_Z+ln(_Z-1)*_Z-ln(10)*_Z-ln(9/10)*_Z-I*Pi*_Z+_Z*t-10*_Z+1),t=0))=1/10;

Maple seems to prefer the wrong solution (1) but occasionally produces (2) e.g. in a new whorksheet!
In earlier versions it seems that only (1)  appears.

The same ODE with another IC

dsolve({ diff(y(t),t) = y(t)^2 - y(t)^3, y(0) = 1/100 }, y(t));

evalf(eval(%,t=0));

is always incorrect. It should be

but Lambert's function never shows up!
Let me mention that only the exact solutions are affected, numeric is ok.

Without an initial condition, dsolve always uses LambertW:

dsolve({ diff(y(t),t) = y(t)^2 - y(t)^3}, y(t));

Can you explain this behavior?

## Interactive geometry...

Maple

Using the Plot Component it is possible to obtain
an interactive worksheet for drawing visually plane geometry
elements, e.g. select a triangle and draw its incircle.
Do you know if such worksheets are available somewhere?

 First 10 11 12 Page 12 of 12
﻿