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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A124371 a(n) = number of earlier terms a(k) such that a(k)*n is a square. 1
0, 1, 1, 3, 1, 1, 1, 1, 7, 1, 1, 2, 1, 1, 1, 12, 1, 2, 1, 1, 1, 1, 1, 1, 19, 1, 3, 2, 1, 1, 1, 4, 1, 1, 1, 27, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 5, 38, 4, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 51, 1, 1, 1, 1, 1, 1, 1, 5, 1, 1, 5, 2, 1, 1, 1, 4, 64, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 6, 1, 82, 1, 1 (list; graph; refs; listen; history; internal format)
OFFSET

1,4

EXAMPLE

12*a(1) = 0 and 12*a(4) = 36 are the two squares made by multiplying earlier terms with 12. So a(12) = 2.

MATHEMATICA

f[l_List] := Append[l, Length[Select[Sqrt /@ ((Length[l] + 1)*l), IntegerQ]]]; Nest[f, {}, 105] (*Chandler*)

CROSSREFS

Cf. A124372.

Sequence in context: A028264 A010122 A058663 * A147989 A119329 A054724

Adjacent sequences:  A124368 A124369 A124370 * A124372 A124373 A124374

KEYWORD

easy,nonn

AUTHOR

Leroy Quet Oct 27 2006

EXTENSIONS

Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Oct 29 2006

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 20:14 EST 2012. Contains 205962 sequences.