Liebe Freundinnen und Freunde neuerer Mathematicaversionen,
das Verhalten - Fehlerausschrift bei Iteratorschritt 0 -
kann man in Version 10.2 - with a little help of the Ministry of Silly
Walks - erzwingen
In[6]:= Table[a[o], {o, x, x, #}] & /@ Range[-1, 1]
Out[6]= {{a[x]}, {a[x]}, {a[x]}}
Das ist korrekt (Mathematica 10.2), es gibt nichts zu tun.
Hier ist der Iteratorschritt 0 ein Fehler:
In[7]:= Table[a[o], {o, x, x + 1, #}] & /@ Range[-1, 1]
During evaluation of In[7]:= Divide::infy: Infinite expression 1/0
encountered. >>
During evaluation of In[7]:= Table::iterb: Iterator {o,x,1+x,0} does not
have appropriate bounds. >>
During evaluation of In[7]:= Divide::infy: Infinite expression 1/0
encountered. >>
During evaluation of In[7]:= Table::iterb: Iterator {o,x,1+x,0} does not
have appropriate bounds. >>
Out[7]= {{}, Table[a[o], {o, x, 1 + x, 0}], {a[x], a[1 + x]}}
das erste und das letzte Ergebnis sind korrekt, in der Mitte hapert es zu
Recht: Wenn x endlich ist und überhaupt eine Addition mit 1 zulässt (d.h.
wenn x eine Zahl ist), dann ist der Iterator 0 verkehrt. Das Beispiel von
Hans funktioniert mit Mathematica 10.2
In[20]:= (* dieses Beispiel heute *)
Clear[sgn];
sgn[x_] := Which[x > 0, 1, x == 0, 0, x < 0, -1]
n = 6; M = 4;
Table[{i, j}, {i, 0, n}, {j, 0, M - i, sgn[M - i]}]
Out[23]= {{{0, 0}, {0, 1}, {0, 2}, {0, 3}, {0, 4}}, {{1, 0}, {1,
1}, {1, 2}, {1, 3}}, {{2, 0}, {2, 1}, {2, 2}}, {{3, 0}, {3,
1}}, {{4, 0}}, {{5, 0}, {5, -1}}, {{6, 0}, {6, -1}, {6, -2}}}
In[24]:= (* dieses Beispiel heute *)
Clear[sgn];
sgn[x_] := Which[x > 0, 1, x == 0, hotzenPlotz, x < 0, -1]
n = 6; M = 4;
Table[{i, j}, {i, 0, n}, {j, 0, M - i, sgn[M - i]}]
Out[27]= {{{0, 0}, {0, 1}, {0, 2}, {0, 3}, {0, 4}}, {{1, 0}, {1,
1}, {1, 2}, {1, 3}}, {{2, 0}, {2, 1}, {2, 2}}, {{3, 0}, {3,
1}}, {{4, 0}}, {{5, 0}, {5, -1}}, {{6, 0}, {6, -1}, {6, -2}}}
der Iterator 0 oder "hotzenPlotz" wird ignoriert, da es nichts zu tun gibt.
Mit den besten Grüssen
Udo.
On Fri, 14 Aug 2015 20:25:04 +0200, h.dolhaine--- via demug
<demug@XXXXXXX.ch> wrote:
Allerdings tauchen da andere spannende Probleme auf.
_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html
DMUG-Archiv, http://www.mathematica.ch/archiv.html