|
Search: id:A072494
|
|
|
| A072494 |
|
First of triples of consecutive happy numbers, i.e. the first of three consecutive integers each of which is a happy number (A007770). |
|
+0
2
|
|
| 1880, 4780, 4870, 7480, 7839, 7840, 8180, 8470, 8739, 8740, 8810, 10880, 11248, 11249, 11519, 12148, 12149, 13898, 15119, 18080, 18800, 21148, 21149, 23308, 25680, 25860, 26580, 26850, 28560, 28650, 31898, 32308, 33208, 33319, 40780
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
REFERENCES
|
David Wells, The Penguin Dictionary of Curious and Interesting Numbers, p. 154 (Rev. ed. 1997).
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Happy Number
|
|
EXAMPLE
|
7480 is included because 7480, 7481 and 7482 are all happy numbers.
|
|
MATHEMATICA
|
happyQ[n_] := Nest[Plus @@(IntegerDigits[ # ]^2\)&, n, 50] == 1); Transpose[Select[Partition[Select[Range[50000], happyQ], 3, 1], #[[3]] - #[[2]] == #[[2]] - #[[1]] == 1 &]][[1]]
|
|
CROSSREFS
|
Sequence in context: A127410 A045201 A020407 this_sequence A029564 A106764 A157486
Adjacent sequences: A072491 A072492 A072493 this_sequence A072495 A072496 A072497
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Harvey P. Dale (hpd1(AT)nyu.edu), Aug 02 2002
|
|
|
Search completed in 0.002 seconds
|
