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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A270617 Primes p such that A256832(p) is divisible by p. 2
2, 5, 7, 13, 17, 23, 29, 31, 37, 41, 47, 53, 59, 61, 71, 73, 79, 89, 97, 101, 103, 109, 113, 127, 137, 149, 151, 157, 167, 173, 179, 181, 191, 193, 197, 199, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 271, 277, 281, 293, 311, 313, 317, 337, 349, 353, 359, 367, 373, 379, 383, 389, 397 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Sequence focuses on the prime numbers because of the complement of this sequence. Primes that are listed in this sequence cannot be generated by function which is related with A213891. See comment section of A213891.

LINKS

Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

EXAMPLE

5 is a term because A256832(5) = 3480 is divisible by 5.

MATHEMATICA

nn = 400; s = FoldList[Times, LinearRecurrence[{2, 1}, {1, 2}, nn]]; Select[Prime@ Range@ PrimePi@ nn, Divisible[s[[#]], #] &] (* Michael De Vlieger, Mar 27 2016, after Harvey P. Dale at A256832 *)

PROG

(PARI) a000129(n) = ([2, 1; 1, 0]^n)[2, 1];

t(n) = prod(k=1, n, Mod(a000129(k), n));

forprime(p=2, 1e3, if(lift(t(p)) == 0, print1(p, ", ")));

(PARI) is(n)=my(a=Mod(1, n), b=Mod(2, n)); for(i=2, n, if(b==0, return(isprime(n))); [a, b]=[b, 2*b+a]); 0 \\ Charles R Greathouse IV, Mar 31 2016

(PARI) list(lim)=my(v=List([2]), G=factorback(primes([2, lim])), a=1, b=2, t=2, p=2); forprime(q=3, lim, for(n=p+1, q, [a, b]=[b, 2*b+a]; t=gcd(t*b, G)); if(t%q==0, listput(v, q)); G/=q; p=q); Vec(v) \\ Charles R Greathouse IV, Mar 31 2016

CROSSREFS

Cf. A000129, A256832, A213891.

Sequence in context: A023204 A248606 A252801 * A045352 A278494 A107426

Adjacent sequences:  A270614 A270615 A270616 * A270618 A270619 A270620

KEYWORD

nonn

AUTHOR

Altug Alkan, Mar 20 2016

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 16 23:50 EDT 2019. Contains 328103 sequences. (Running on oeis4.)