Some bugs in Mathematica
- To: mathgroup at smc.vnet.net
- Subject: [mg59188] Some bugs in Mathematica
- From: akhmel at hotmail.com
- Date: Mon, 1 Aug 2005 01:05:01 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Dear Mr. Lichtblau,
I attach hereby Mathematica file with 3 examples, which you might be
interested to look at.
1) Example of summation which gives an obviously wrong result, 0
instead of
1.
2) Example of indefinate integration, which gives appel function
instead of
elementary logarithm.
3) Definite integration which doesn't give any result at all, though
again,
it is nothing but elementary function.
Your comments will be appreciated.
Thanks,
Alex
Notebook[{
Cell[CellGroupData[{
Cell[BoxData[
\(Sum[\(Gamma[n - k - 1/2] Gamma[k + 1/2]\)\/\(Gamma[n - k - 1]
Gamma[k + \
1]\), {k, 0, n - 1}]\)], "Input"],
Cell[BoxData[
\(0\)], "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[BoxData[
\(Integrate[1\/\(r \(\@\( r\^2 - a\^2\)\) \@\(r\^2 - b\^2\)\),
r]\)], "Input"],
Cell[BoxData[
\(\(-\(\(\@\(1 - a\^2\/r\^2\)\ \@\(1 - b\^2\/r\^2\)\ AppellF1[1,
1\/2,
1\/2, 2, a\^2\/r\^2,
b\^2\/r\^2]\)\/\(2\ \@\(\(-a\^2\) + r\^2\)\ \@\(\(-b\^2\)
+ \
r\^2\)\)\)\)\)], "Output"]
}, Open ]],
Cell[BoxData[
\(\(\(-\(\(\@\(1 - a\^2\/r\^2\)\ \@\(1 - b\^2\/r\^2\)\ AppellF1[1,
1\/2,
1\/2, 2, a\^2\/r\^2,
b\^2\/r\^2]\)\/\(2\ \@\(\(-a\^2\) + r\^2\)\ \@\(\(-b\^2\)
+ \
r\^2\)\)\)\)\(\[IndentingNewLine]\)
\)\)], "Input"],
Cell[CellGroupData[{
Cell[BoxData[
\(Integrate[
1\/\(\(r\^3\) \(\@\(r\^2 - a\^2\)\) \@\(r\^2 - b\^2\)\), {r, x,
a}]\)], "Input"],
Cell[BoxData[
\(Integrate::"gener" \(\(:\)\(\ \)\)
"Unable to check convergence."\)], "Message"],
Cell[BoxData[
\(\[Integral]\_x\%a\(
1\/\(r\^3\ \@\(\(-a\^2\) + r\^2\)\ \@\(\(-b\^2\) +
r\^2\)\)\) \
\[DifferentialD]r\)], "Output"]
}, Open ]]
},
FrontEndVersion->"4.2 for Microsoft Windows",
ScreenRectangle->{{0, 720}, {0, 407}},
WindowSize->{496, 249},
WindowMargins->{{0, Automatic}, {Automatic, 0}}
]
(*******************************************************************
Cached data follows. If you edit this Notebook file directly, not
using Mathematica, you must remove the line containing CacheID at
the top of the file. The cache data will then be recreated when
you save this file from within Mathematica.
*******************************************************************)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[1776, 53, 127, 2, 44, "Input"],
Cell[1906, 57, 35, 1, 29, "Output"]
}, Open ]],
Cell[CellGroupData[{
Cell[1978, 63, 103, 2, 48, "Input"],
Cell[2084, 67, 228, 4, 71, "Output"]
}, Open ]],
Cell[2327, 74, 259, 5, 98, "Input"],
Cell[CellGroupData[{
Cell[2611, 83, 126, 3, 48, "Input"],
Cell[2740, 88, 107, 2, 24, "Message"],
Cell[2850, 92, 148, 3, 46, "Output"]
}, Open ]]
}
]
*)
- Follow-Ups:
- Re: Some bugs in Mathematica
- From: Chris Chiasson <chris.chiasson@gmail.com>
- Re: Some bugs in Mathematica
- From: Zhengji Li <zhengji.li@gmail.com>
- Re: Some bugs in Mathematica