id:A089993 - OEIS Search Results

Search: id:A089993

Displaying 1-1 of 1 results found.

page 1

Penultimate prime divisor of n if it exists.

+0
1

2, 2, 2, 2, 3, 2, 2, 3, 2, 2, 2, 2, 3, 3, 2, 5, 2, 2, 3, 2, 3, 2, 3, 2, 2, 2, 3, 2, 2, 5, 2, 3, 2, 3, 2, 3, 5, 3, 2, 3, 5, 2, 2, 3, 2, 7, 3, 2, 2, 3, 5, 2, 3, 2, 3, 7, 2, 3, 2, 5, 2, 2, 3, 2, 3, 2, 5, 2, 2, 5, 3, 2, 3, 5, 2, 3, 2, 7, 3, 2, 3, 2, 3, 3, 5, 3, 7, 2, 3, 2, 3, 5, 3, 2, 11, 2, 5, 2, 3, 2, 3, 2, 3, 7, 5 (list; graph; listen)

	OFFSET	`2,1`
	PROGRAM	`(PARI) f(n) = a=factor(n); v=a[, 1]; ln=length(v); if(ln>1, return(v[ln-1])) g(m) = for(x=2, m, if(f(x)>0, print1(f(x)", ")))`
	CROSSREFS	`Sequence in context: A033947 A069719 A074592 this_sequence A047931 A033618 A061357` `Adjacent sequences: A089990 A089991 A089992 this_sequence A089994 A089995 A089996`
	KEYWORD	`nonn`
	AUTHOR	`Cino Hilliard (hillcino368(AT)gmail.com), Jan 14 2004`

page 1

Search completed in 0.002 seconds

Last modified November 23 10:40 EST 2009. Contains 167421 sequences.

AT&T Labs Research