| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste |
Liebe Jeany,
ganz kompakt geht es aber auch so (RandomChoice ist nicht ganz das, was
gewünscht ist...).
c1 = Total [ RandomSample [ If [ # < .08, 0, 1] & /@ RandomReal [ {0, 1},
80], 13 ] ]
Beste Grüße
Hans
demug.nb
Description: Mathematica Notebook document
_______________________________________________ DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch http://www.mathematica.ch/mailman/listinfo/demug Archiv: http://www.mathematica.ch/archiv.html
| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste |
DMUG-Archiv, http://www.mathematica.ch/archiv.html