[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: How to calculate maximun value within fields
From: |
Frans Houweling |
Subject: |
Re: How to calculate maximun value within fields |
Date: |
Thu, 6 Feb 2014 09:00:10 +0100 |
User-agent: |
Mozilla/5.0 (Windows NT 6.1; rv:24.0) Gecko/20100101 Thunderbird/24.2.0 |
Hi Carlos, as no one seems to answer, here is my go at it.
DATA LIST FREE / A B C D.
BEGIN DATA
0.1 0.5 0.4 0.0
0.2 0.2 0.1 0.5
0.9 0.1 0.0 0.0
END DATA.
COMPUTE HiVar = 0.
COMPUTE #HiVal = -1.
VECTOR val = A TO D.
LOOP #i = 1 TO 4.
+ DO IF val(#i) GT #HiVal.
+ COMPUTE #HiVal = val(#i).
+ COMPUTE HiVar = #i.
+ END IF.
END LOOP.
EXE.
VALUE LABELS HiVar 0 "X" 1 "A" 2 "B" 3 "C" 4 "D".
* And if you really want a string:.
STRING HiName (A1).
DO REPEAT val = 0 1 2 3 4 /name = "X" "A" "B" "C" "D".
+ IF (HiVar EQ val) HiName = name.
END REPEAT
EXE.
LIST VARIABLES = A TO HiName.
Have fun
frans