| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste | 
> letztendlich in einem Ausdruck erkennt, ob Symbole mit Namen
> 
> xyz21   oder   xyz33   oder   xyz76
> 
> vorhanden sind,
Names["xyz*"]
> d.h. ob es im Ausdruck Variablen mit diesen Namen gibt,
> und dann diese Variablen so analysiert, dass aus
> 
> xyz21 -> xyz[2,1]
> 
> xyz33 -> xyz[3,3]
> 
> xyz76 -> xyz[7,6]
SplitSym[s_Symbol] :=
Block[ {c = Characters[ToString[s]]},
  ToExpression[StringJoin[Select[c, LetterQ]]]@@ Select[c, DigitQ]
]
Gruß,
Thomas Hahn
| Frühere | Chronologischer Index | Spätere | ||
| Vorherige | Thematischer Index | Nächste | 
 DMUG-Archiv, http://www.mathematica.ch/archiv.html