id:A073321 - OEIS Search Results

Search: id:A073321

Displaying 1-1 of 1 results found.

page 1

a(n)=A073259[A000040(n)]; Length of FixedPointList started with n-th prime and leading to corresponding composite number.

+0
2

4, 4, 3, 4, 4, 3, 3, 4, 3, 5, 3, 4, 3, 5, 3, 4, 4, 4, 4, 3, 4, 5, 5, 3, 4, 4, 3, 4, 3, 3, 4, 4, 4, 5, 5, 4, 4, 3, 4, 3, 5, 4, 4, 4, 4, 4, 4, 5, 4, 4, 4, 4, 3, 5, 4, 3, 5, 4, 3, 4, 5, 4, 5, 4, 4, 4, 4, 4, 4, 5, 4, 4, 4, 6, 4, 4, 4, 5, 4, 4, 4, 4, 4, 4, 3, 4, 4, 4, 4, 4, 5, 4, 4, 6, 4, 4, 4, 4, 4, 5, 4, 4, 4, 4, 4 (list; graph; listen)

	OFFSET	`1,1`
	FORMULA	`See Program.`
	EXAMPLE	`a=10,p(10)=29, list={29,40,42,43,44}.`
	MATHEMATICA	`lfp[x_] := Length[FixedPointList[x+PrimePi[ # ]+1&, x]]-1 Table[lfp[Prime[w]]-1, {w, 1, 128}]`
	CROSSREFS	`Cf. A002808, A073259.` `Sequence in context: A073261 A020805 A106147 this_sequence A055620 A072420 A023530` `Adjacent sequences: A073318 A073319 A073320 this_sequence A073322 A073323 A073324`
	KEYWORD	`nonn`
	AUTHOR	`Labos E. (labos(AT)ana.sote.hu), Jul 29 2002`

page 1

Search completed in 0.002 seconds

Last modified December 1 19:22 EST 2009. Contains 167811 sequences.

AT&T Labs Research