Operation Manual

Blz. 18-60
• Als p = n-1, dan
X = V
n
,
Anders, als p < n-1
Verwijder de kolommen p+2, …, n uit V
n
om X te vormen
(Gebruik een FOR-lus en COL-)
Of
Voeg de kolommen n+1, …, p+1 toe aan V
n
om X te vormen
(FOR-lus, bereken x
i
, zet om naar vector, gebruik COL+)
• Zet y om in vector
• Bereken b met het programma MTREG (zie het voorbeeld voor
meervoudige lineaire aanpassing hierboven)
Hier staat de vertaling van het algoritme
naar een programma in User RPL-taal.
(Zie hoofdstuk 21 voor meer informatie over programmeren.):
« Activeert het programma
 x y p Voert de lijsten x en y en p in (niveaus 3,2,1)
« Achtiveert het subprogramma 1
x SIZE  n Bepaalt de grootte van x-lijst
« Activeert het subprogramma 2
x VANDERMONDE Plaatst x in stapelgeheugen, krijgt V
n
IF ‘p<n-1’ THEN Deze IF voert stap 3 in algoritme in
n Plaatst n in stapelgeheugen
p 2 + Berekent p+1
FOR j Startlus j = n-1, n-2, …, p+1, stap = -1
j COL− DROP Verwijdert kolom en haalt deze uit
stapelgeheugen
-1 STEP Sluit FOR-STEP-lus
ELSE
IF ‘p>n-1’ THEN
n 1 + Berekent n+1
p 1 + Berekent p+1
FOR j Begint een lus met j = n, n+1, …, p+1.
x j ^ Berekent x
j
als een lijst
OBJARRY Zet lijst om in verzameling
j COL+ Voegt kolom toe aan matrix
NEXT Sluit FOR-NEXT-lus
END Eindigt tweede IF-clausule
END Eindigt eerste IF-clausule Het resultaat is X
y OBJARRY Zet lijst y om in een verzameling
MTREG X en y gebruikt door programma MTREG