id:A133674 - OEIS Search Results

Search: id:A133674

Displaying 1-1 of 1 results found.

page 1

a(n) = |A061395(n+1) - A061395(n)|.

+0
2

1, 1, 1, 2, 1, 2, 3, 1, 1, 2, 3, 4, 2, 1, 2, 6, 5, 6, 5, 1, 1, 4, 7, 1, 3, 4, 2, 6, 7, 8, 10, 4, 2, 3, 2, 10, 4, 2, 3, 10, 9, 10, 9, 2, 6, 6, 13, 2, 1, 4, 1, 10, 14, 3, 1, 4, 2, 7, 14, 15, 7, 7, 3, 5, 1, 14, 12, 2, 5, 16, 18, 19, 9, 9, 5, 3, 1, 16, 19, 1, 11, 10, 19, 3, 7, 4, 5, 19, 21, 3, 3, 2, 4, 7, 6 (list; graph; listen)

	OFFSET	`1,4`
	MATHEMATICA	`f[n_] := Abs[ PrimePi[ FactorInteger[n]][[ -1, 1]] - PrimePi[ FactorInteger[n + 1]][[ -1, 1]]]; Array[f, 95] (* Robert G. Wilson v *)`
	CROSSREFS	`Sequence in context: A145782 A131794 A145726 this_sequence A162319 A098666 A133232` `Adjacent sequences: A133671 A133672 A133673 this_sequence A133675 A133676 A133677`
	KEYWORD	`nonn`
	AUTHOR	`Giovanni Teofilatto (g.teofilatto(AT)tiscalinet.it), Dec 29 2007`
	EXTENSIONS	`Edited by Robert G. Wilson v (rgwv(AT)rgwv.com) and N. J. A. Sloane (njas(AT)research.att.com), Dec 30 2007`

page 1

Search completed in 0.002 seconds

Last modified November 27 22:38 EST 2009. Contains 167602 sequences.

AT&T Labs Research