login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A128163 Numbers k such that A128162(k) is prime. 2
5, 7, 9, 11, 13, 14, 15, 26, 30, 53, 66, 82, 155, 189, 225, 261, 625, 870, 1071, 7655, 8191, 8883, 9226, 12246, 70274, 71595 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Corresponding primes in A128162 are {3, 3, 31, 37, 137, 347, 487, 77951, 166409, 13506083561, ...}.

LINKS

Table of n, a(n) for n=1..26.

MATHEMATICA

Do[f=PowerMod[3, n, Fibonacci[n]]; If[PrimeQ[f], Print[{n, f}]], {n, 1, 1071}]

Select[Range[72000], PrimeQ[PowerMod[3, #, Fibonacci[#]]]&] (* Harvey P. Dale, Sep 11 2019 *)

PROG

(PARI) is(n)=ispseudoprime(3^n%fibonacci(n)) \\ Charles R Greathouse IV, Jun 19 2017

(PFGW)

ABC2 3^$a % F($a)

a: from 5 to 1000000

// Charles R Greathouse IV, Jun 19 2017

CROSSREFS

Cf. A128162 (3^n modulo Fibonacci(n)), A128161, A057862 (2^n modulo Fibonacci(n)).

Sequence in context: A175382 A279244 A325797 * A177088 A168146 A343064

Adjacent sequences:  A128160 A128161 A128162 * A128164 A128165 A128166

KEYWORD

hard,more,nonn

AUTHOR

Alexander Adamchuk, Feb 19 2007

EXTENSIONS

Corrected and extended by Stefan Steinerberger, Jun 10 2007

a(25)-a(26) from Donovan Johnson, Sep 03 2008

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 20 01:04 EDT 2022. Contains 353847 sequences. (Running on oeis4.)