Fun with HP 12C Part II
Sine Approximation
Source:  Ted’s Math
World, Calculator Magic #4
Retrieved 2014-10-13
sin x ≈ (((x^2/72 – 1)*x^2/42 + 1)*x^/20 – 1)*x^2/6 +
1)*x
| 
STEP | 
KEY | 
CODE | 
STEP | 
KEY | 
CODE | 
| 
01 | 
STO 0 | 
44, 0 | 
21 | 
0 | 
0 | 
| 
02 | 
2 | 
2 | 
22 | 
÷ | 
10 | 
| 
03 | 
y^x | 
21 | 
23 | 
* | 
20 | 
| 
04 | 
ENTER | 
36 | 
24 | 
1 | 
1 | 
| 
05 | 
ENTER | 
36 | 
25 | 
- | 
30 | 
| 
06 | 
ENTER | 
36 | 
26 | 
X<>Y | 
34 | 
| 
07 | 
7 | 
7 | 
27 | 
6 | 
6 | 
| 
08 | 
2 | 
2 | 
28 | 
÷ | 
10 | 
| 
09 | 
÷ | 
10 | 
29 | 
* | 
20 | 
| 
10 | 
1 | 
1 | 
30 | 
1 | 
1 | 
| 
11 | 
- | 
30 | 
31 | 
+ | 
40 | 
| 
12 | 
X<>Y | 
34 | 
32 | 
RCL 0 | 
45, 0 | 
| 
13 | 
4 | 
4 | 
33 | 
* | 
20 | 
| 
14 | 
2 | 
2 | 
34 | 
STO 1 | 
44, 1 | 
| 
15 | 
÷ | 
10 | 
35 | 
GTO 00 | 
43, 33, 00 | 
| 
16 | 
* | 
20 |  |  |  | 
| 
17 | 
1 | 
1 |  |  |  | 
| 
18 | 
+ | 
40 |  |  |  | 
| 
19 | 
X<>Y | 
34 |  |  |  | 
| 
20 | 
2 | 
2 |  |  |  | 
Examples:
sin 0.25 ≈ 0.2474
sin -1.82 ≈ -0.9691
Cosine Approximation
Source:  Ted’s Math
World, Calculator Magic #4
Retrieved 2014-10-13
cos x ≈ (((x^2/56 – 1)*x^2/30 + 1)*x^2/12 – 1)*x^2/2 + 1
Registers:  R0 = x
in radians, R1 = cos x
| 
STEP | 
KEY | 
CODE | 
STEP | 
KEY | 
CODE | 
| 
1 | 
STO 0 | 
44, 0  | 
17 | 
1 | 
1 | 
| 
2 | 
2 | 
2 | 
18 | 
+ | 
40 | 
| 
3 | 
Y^X | 
21 | 
19 | 
X<>Y | 
34 | 
| 
4 | 
ENTER | 
36 | 
20 | 
1 | 
1 | 
| 
5 | 
ENTER | 
36 | 
21 | 
2 | 
2 | 
| 
6 | 
ENTER | 
36 | 
22 | 
÷ | 
10 | 
| 
7 | 
5 | 
5 | 
23 | 
* | 
20 | 
| 
8 | 
6 | 
6 | 
24 | 
1 | 
1 | 
| 
9 | 
÷ | 
10 | 
25 | 
- | 
30 | 
| 
10 | 
1 | 
1 | 
26 | 
X<>Y | 
34 | 
| 
11 | 
- | 
30 | 
27 | 
2 | 
2 | 
| 
12 | 
X<>y | 
34 | 
28 | 
÷ | 
10 | 
| 
13 | 
3 | 
3 | 
29 | 
* | 
20 | 
| 
14 | 
0 | 
0 | 
30 | 
1 | 
1 | 
| 
15 | 
÷ | 
10 | 
31 | 
+ | 
40 | 
| 
16 | 
* | 
20 | 
32 | 
STO 1 | 
44, 1 | 
|  |  |  | 
33 | 
GTO 00 | 
43,33,0 | 
|  |  |  |  |  |  | 
cos 0.33 ≈ 0.23847605343
cos -0.58 ≈ 0.83646264991
Rough Approximation for erf(x)
If x ≤ 1, accuracy is at least 3 digits.  Method:  3/8 Integration Rule
Source:  Ball, John
A.   “Algorithms for RPN Calculators” John Wiley
& Sons:  1978.
| 
STEP | 
KEY | 
CODE | 
STEP | 
KEY | 
CODE | 
| 
1 | 
STO 0 | 
44, 0 | 
26 | 
CHS | 
16 | 
| 
2 | 
3 | 
3 | 
27 | 
e^x | 
43, 22 | 
| 
3 | 
÷ | 
10 | 
28 | 
+ | 
40 | 
| 
4 | 
2 | 
2 | 
29 | 
8 | 
8 | 
| 
5 | 
Y^X | 
21 | 
30 | 
÷ | 
10 | 
| 
6 | 
CHS | 
16 | 
31 | 
3 | 
3 | 
| 
7 | 
e^x | 
43, 22 | 
32 | 
* | 
20 | 
| 
8 | 
ENTER | 
36 | 
33 | 
RCL 0 | 
45, 0 | 
| 
9 | 
RCL 0 | 
45, 0 | 
34 | 
* | 
20 | 
| 
10 | 
2 | 
2 | 
35 | 
3 | 
3 | 
| 
11 | 
* | 
20 | 
36 | 
÷ | 
10 | 
| 
12 | 
3 | 
3 | 
37 | 
1 | 
1 | 
| 
13 | 
÷ | 
10 | 
38 | 
. | 
48 | 
| 
14 | 
2 | 
2 | 
39 | 
1 | 
1 | 
| 
15 | 
Y^X | 
21 | 
40 | 
2 | 
2 | 
| 
16 | 
CHS | 
16 | 
41 | 
8 | 
8 | 
| 
17 | 
e^x | 
43, 22 | 
42 | 
3 | 
3 | 
| 
18 | 
+ | 
30 | 
43 | 
7 | 
7 | 
| 
19 | 
3 | 
3 | 
44 | 
9 | 
9 | 
| 
20 | 
* | 
20 | 
45 | 
7 | 
7 | 
| 
21 | 
1 | 
1 | 
46 | 
* | 
20 | 
| 
22 | 
+ | 
40 | 
47 | 
GTO 00 | 
43,33,00 | 
| 
23 | 
RCL 0 | 
45, 0 |  |  |  | 
| 
24 | 
2 | 
2 |  |  |  | 
| 
25 | 
Y^X | 
21 |  |  |  | 
Examples:
x = .15;  Result ≈
0.1680
x = .50;  Result ≈
0.5205
x = 1.25; Result ≈ 0.9220 
(actual ≈ 0.9229)
This blog is property of Edward Shore, 2014.
