Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A124372
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A124372 a(n) = number of earlier terms a(k) such that a(k)*n is of the form m^j, m = integer >= 0, j = integer >= 2. +0
2
0, 1, 1, 3, 1, 1, 1, 6, 7, 1, 1, 2, 1, 1, 1, 12, 1, 3, 1, 1, 1, 1, 1, 2, 17, 1, 21, 2, 1, 1, 1, 24, 1, 1, 1, 25, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 4, 37, 5, 1, 1, 1, 4, 1, 1, 1, 1, 1, 1, 1, 1, 2, 53, 1, 1, 1, 2, 1, 1, 1, 10, 1, 1, 4, 1, 1, 1, 1, 2, 63, 1, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 3, 1, 10, 1, 77 (list; graph; listen)
OFFSET

1,4

EXAMPLE

12*a(1) = 0 and 12*a(4) = 36 are the two integers of the form m^j (m=nonnegative integer, j = integer >= 2) made by multiplying earlier terms with 12. So a(12) = 2.

MATHEMATICA

f[l_List] := Append[l, Length[Select[(Length[l] + 1)*l, # == 0 || GCD @@ Last /@ FactorInteger[ # ] > 1 &]]]; Nest[f, {}, 100] (*Chandler*)

CROSSREFS

Cf. A124371.

Sequence in context: A096744 A080002 A058057 this_sequence A126470 A102480 A140670

Adjacent sequences: A124369 A124370 A124371 this_sequence A124373 A124374 A124375

KEYWORD

easy,nonn

AUTHOR

Leroy Quet (qq-quet(AT)mindspring.com), Oct 27 2006

EXTENSIONS

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

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified July 25 07:41 EDT 2008. Contains 142293 sequences.


AT&T Labs Research