Re: [Dmug] Aufgabe::OperatorApplied

[Susanne & Udo Krause via demug <demug@XXXXXXX.ch>]

das war ja wohl nix, dreimal dasselbe Resultat evaluiert

In[4]:= Through[{LeafCount, ByteCount, Length}[{17, 12, 10, 6, 13, 2,
   11, 1, 8, 2, 15, 1, 14, 9, 3, 8, 1, 17, 2, 14, 1, 2, 16, 14, 7, 5,
   4, 2, 3, 8, 15}]]

Out[4]= {32, 784, 31}

sorry.

Am 22.03.2020 um 10:06 schrieb Susanne & Udo Krause via demug:
> und auch die verschachtelte Variante zeigt dieselben Anzahlen wie die 
> vorhergehenden
>
>
> In[66]:= Through[{LeafCount, ByteCount, Length}[With[{c = 
> Characters[str]}, With[{s = Union[c]}, c /. Inner[Rule, s, 
> Range[Length[s]], List]]]]]
>
> Out[66]= {32, 784, 31} 
_______________________________________________
DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
http://www.mathematica.ch/mailman/listinfo/demug
Archiv: http://www.mathematica.ch/archiv.html