id:A093337 - OEIS Search Results

Search: id:A093337

Displaying 1-1 of 1 results found.

page 1

Penultimate digits of the primes.

+0
1

1, 1, 1, 1, 2, 2, 3, 3, 4, 4, 4, 5, 5, 6, 6, 7, 7, 7, 8, 8, 9, 0, 0, 0, 0, 1, 2, 3, 3, 3, 4, 5, 5, 6, 6, 7, 7, 8, 9, 9, 9, 9, 1, 2, 2, 2, 3, 3, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 0, 1, 1, 1, 3, 3, 4, 4, 5, 5, 6, 7, 7, 8, 8, 9, 0, 0, 1, 2, 3, 3, 3, 4, 4, 5, 6, 6, 6, 7, 8, 9, 9, 0, 0, 2, 2, 4, 4, 5, 6, 6, 7, 7, 8, 9, 9 (list; graph; listen)

	OFFSET	`11,5`
	PROGRAM	`(PARI) penult(n) = { forprime(x=11, n, s = Str(x); ln = length(s); pu = mid(s, ln-1, 1); print1(pu", ") ) } \ Get a substring of length n from string str starting at position s in str. mid(str, s, n) = { v =""; tmp = Vec(str); ln=length(tmp); for(x=s, s+n-1, v=concat(v, tmp[x]); ); return(v) }`
	CROSSREFS	`Cf. A093336, A077648, A007652.` `Sequence in context: A000006 A061017 A088462 this_sequence A120397 A104305 A050506` `Adjacent sequences: A093334 A093335 A093336 this_sequence A093338 A093339 A093340`
	KEYWORD	`nonn,base`
	AUTHOR	`Cino Hilliard (hillcino368(AT)gmail.com), Apr 25 2004`

page 1

Search completed in 0.002 seconds

Last modified November 25 20:09 EST 2009. Contains 167514 sequences.

AT&T Labs Research