Hallo Stephan,
versuchen Sie doch mal:
For[i = 1, i <= lo, i++,
Print@Show[DrawPD[out[[i]], {Gap -> 0.025}]]]
bzw.
For[i = 1, i <= lo, i++,
Print[Show[DrawPD[out[[i]], {Gap -> 0.025}]]]]
das sollte funktionieren
Grüße,
Peter
Am 27.07.2018 um 09:04 schrieb Stephan Rosebrock via demug:
> ...
> and then
>
> Show[DrawPD[out[[1]], {Gap -> 0.025}]]
>
> Everything works fine. But
>
> For[i = 1, i <= lo, i++,
> Show[DrawPD[out[[i]], {Gap -> 0.025}]]]
>
> shows no output at all. I don't understand that. Do you have an idea?
>
> Best wishes
> Stephan
_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html