login
This site is supported by donations to The OEIS Foundation.
Logo

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A114245 Number of Fermat pseudoprimes to base 3 less than 10^n. 4
0, 1, 6, 23, 78, 246, 760, 2155 (list; graph; refs; listen; history; internal format)
OFFSET

1,3

LINKS

Eric Weisstein's World of Mathematics, FermatPseudoprime

FORMULA

A005935[a(n)]<10^n; A005935[a(n)+1]>10^n. - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 10 2007

PROG

(PARI) isFps(n, b)= { if(isprime(n), return(0) ) ; if( (b^(n-1)) % n == 1, return(1), return(0) ) ; } { a=0 ; e=1 ; for(n=1, 10^12, if( n == 10^e, e++ ; print(a) ; ) ; a += isFps(n, 3) ; ) ; } - R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Feb 10 2007

CROSSREFS

Sequence in context: A060188 A058751 A034359 * A078798 A027043 A006815

Adjacent sequences:  A114242 A114243 A114244 * A114246 A114247 A114248

KEYWORD

nonn,more

AUTHOR

Eric Weisstein (eric(AT)weisstein.com), Nov 18, 2005

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 18 00:14 EST 2012. Contains 206085 sequences.