**HP Prime and TI-84 Plus CE: Percent Change on Paired Data**

**Introduction**

Given a two column matrix, the programs here calculate the percent difference on each row. The first column is the old value while the second column is the new value.

**HP Prime Program %CHGPAIRED**

EXPORT %CHGPAIRED(m0)

BEGIN

// Δ% on a 2 column matrix

// 2019-03-31 EWS

LOCAL k,s:=SIZE(m0);

LOCAL n:=s(1);

LOCAL m1:=MAKEMAT(0,n,1);

FOR k FROM 1 TO n DO

m1(k,1):=%CHANGE(m0(k,1),m0(k,2));

END;

RETURN m1;

END;

**TI-84 Plus Program CHGPAIR**

“2019-03-31 EWS”

Disp “PCHG PAIRED DATA”

Input [J]

dim([J])→L₆

L₆(1)→N

{N,1}→dim([I])

For(K,1,N)

([J](K,2)-[J](K,1))/[J](K,1)*100→[I](K,1)

End

Pause [I]

**Example**

M =

[[ 1, 6 ], [ 4, 2 ], [ 3, 7 ], [ 6, 5 ], [ 4, 11 ]]

Result:

[[ 500 ], [ -50 ], [ 133.3333333 ], [ -16.6666667 ]]

[picture]

Source: “Probability and Statistics: Step by Step Solutions for Your HP-28S or HP-28S Calculator” Hewlett Packard. November 1987.

Eddie

All original content copyright, © 2011-2019. Edward Shore. Unauthorized use and/or unauthorized distribution for commercial purposes without express and written permission from the author is strictly prohibited. This blog entry may be distributed for noncommercial purposes, provided that full credit is given to the author.