|
Search: id:A072430
|
|
|
| A072430 |
|
Numbers n for which there are exactly six k such that n = k + reverse(k). |
|
+0
1
|
|
| 66, 143, 606, 626, 646, 666, 686, 706, 726, 746, 766, 786, 1313, 1333, 1353, 1373, 1393, 1413, 1433, 1453, 1473, 1493, 1551, 2222, 2431, 3113, 3762, 4873, 6006, 7986, 13013, 14993, 15051, 15251, 15451, 15651, 15851, 16051, 16126, 16251, 16451
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Subsequence of A067030. First term is A072041(6).
|
|
LINKS
|
Index entries for sequences related to Reverse and Add!
|
|
EXAMPLE
|
66 = k + reverse(k) for k = 15, 24, 33, 42, 51, 60; 626 = k + reverse(k) for k = 115, 214, 313, 412, 511, 610.
|
|
PROGRAM
|
(ARIBAS) var n, k, c, i, rev: integer; st, nst: string; end; m := 6; for n := 0 to 17500 do k := n div 2; c := 0; while k <= n and c < m + 1 do st := itoa(k); nst := ""; for i := 0 to length(st) - 1 do nst := concat(st[i], nst); end; rev := atoi(nst); if n = k + rev then inc(c); if k mod 10 <> 0 and k <> rev then inc(c); end; end; inc(k); end; if c = m then write(n, ", "); end; end;
|
|
CROSSREFS
|
Cf. A067030, A072041.
Sequence in context: A118163 A160848 A160278 this_sequence A044317 A044698 A122125
Adjacent sequences: A072427 A072428 A072429 this_sequence A072431 A072432 A072433
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Jun 17 2002
|
|
|
Search completed in 0.002 seconds
|
