Hey,
ist die Aufgabe: man erstelle die mapL "aus dem Eingabestring"? Dann
str = "wolfram hat sich was ausgedacht";
With[{c=Characters[str]},{s=Union[c]},c/.Inner[Rule,s,Range[Length[s]],
List]]
Cheers
Patrick
On Sa, 2020-03-21 at 21:44 +0100, Susanne & Udo Krause via demug wrote:
> Moin moin,
>
>
> nun hat es neu in
>
> In[126]:= $Version
> Out[126]= "12.1.0 for Microsoft Windows (64-bit) (March 14, 2020)"
>
>
> den OperatorApplied
> (https://reference.wolfram.com/language/ref/OperatorApplied.html),
>
> In[127]:= Clear[mapL]
> mapL = {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};
> OperatorApplied[StringJoin, mapL][" ", "a", "c", "d", "e", "f", "g",
> "h", "i", "l", "m", "o", "r", "s", "t", "u", "w"]
>
> Out[129]= "wolfram hat sich was ausgedacht"
>
>
> man erstelle die Liste mapL (mit einem Einzeiler, what else ... 😬)
>
>
> Grüsse
>
> udo.
>
>
>
> _______________________________________________
> DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch
> http://www.mathematica.ch/mailman/listinfo/demug
> Archiv: http://www.mathematica.ch/archiv.html
signature.asc
Description: This is a digitally signed message part
_______________________________________________ DMUG Deutschsprachiges Mathematica-Forum demug@XXXXXXX.ch http://www.mathematica.ch/mailman/listinfo/demug Archiv: http://www.mathematica.ch/archiv.html
