Function?
- Subject: [mg2810] Function?
- From: hans.steffani at e-technik.tu-chemnitz.de (Hans Steffani)
- Date: Tue, 19 Dec 1995 02:41:22 -0500
- Approved: usenet@wri.com
- Distribution: local
- Newsgroups: wri.mathgroup
- Organization: University of Technology Chemnitz, FRG
For some reason I use.
aktiv[fx_]:=
First[
Position[Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ],
Min[Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ]] ]];
which lookt very ugly? Is there another way using some
kind of local variables to hold
Table[norm[ w[[i,j]]-fx ] , {i,wsize},{j,wsize} ]
?
Hans Friedrich Steffani
--
Hans Friedrich Steffani
Institut fuer Elektrische Maschinen und Antriebe
TU Chemnitz-Zwickau
e-mail: hans.steffani at e-technik.tu-chemnitz.de