login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A076672 Smallest a(n)>a(n-1) such that a(n)^2+a(n-1)^2 is a perfect square, a(1)=6. 0
6, 8, 15, 20, 21, 28, 45, 60, 63, 84, 112, 180, 189, 252, 275, 660, 693, 924, 1232, 1326, 1768, 1974, 2632, 4026, 5368, 6405, 8200, 8319, 11092, 11715, 15620, 16401, 19720, 20706, 20880, 20910, 24752, 24960, 25300, 26565, 29716 (list; graph; refs; listen; history; internal format)
OFFSET

1,1

COMMENTS

The sequence is infinite.

MATHEMATICA

Clear[nxt]; nxt[n_]:=Module[{i=n+1}, While[!IntegerQ[Sqrt[n^2+i^2]], i++]; i]; NestList[nxt, 6, 40]

CROSSREFS

Cf. A076600, A076671 (starting at 5).

Sequence in context: A168610 A066160 A100914 * A063534 A162651 A022320

Adjacent sequences:  A076669 A076670 A076671 * A076673 A076674 A076675

KEYWORD

nonn

AUTHOR

Zak Seidov (zakseidov(AT)yahoo.com), Oct 25 2002

EXTENSIONS

Mathematica program provided by Harvey P. Dale, Dec. 3, 2010

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 16 19:48 EST 2012. Contains 205955 sequences.