id:A087883 - OEIS Search Results

Search: id:A087883

Displaying 1-1 of 1 results found.

page 1

a(n) = PrimePi[n-PrimePi[n-1]] + Prime[Abs[n - Prime[n-2]]]

+0
1

1, 1, 6, 12, 19, 33, 43, 61, 70, 86, 113, 131, 161, 183, 195, 215, 246, 282, 288, 336, 359, 373, 407, 437, 467, 516, 554, 571, 595, 607, 625, 717, 747, 782, 806, 868, 886, 928, 976, 1000, 1041, 1073, 1097, 1163, 1182, 1212, 1228, 1308, 1420, 1444, 1458, 1483 (list; graph; listen)

	OFFSET	`1,3`
	COMMENT	`A reinversion sequence based on the primes with an A005185 pattern.`
	MATHEMATICA	`prid[n_Integer?Positive] := prid[n] =PrimePi[n-PrimePi[n-1]] + Prime[Abs[n - Prime[n-2]]] prid[1] = prid[2] = 1 digits=256 a=Table[prid[n], {n, 1, digits+4}]`
	CROSSREFS	`Cf. A005185.` `Sequence in context: A078816 A051936 A101423 this_sequence A105455 A083207 A094371` `Adjacent sequences: A087880 A087881 A087882 this_sequence A087884 A087885 A087886`
	KEYWORD	`nonn`
	AUTHOR	`Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Oct 12 2003`

page 1

Search completed in 0.002 seconds

Last modified August 19 23:53 EDT 2008. Contains 142930 sequences.

AT&T Labs Research