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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A153353 List of pairs of concatenated adjacent primes [p(n),p(n+1)] such that the concatenation is divisible by n. 1
23, 57, 127131, 937941, 2087320879, 6557965581, 925039925051, 14073611407383, 89811798981191, 94647139464723, 1553629915536303, 122504623122504633, 200602291200602313, 495401873495401911, 133201458751133201458773 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

The corresponding values of n are listed in A125085.

Subset of A045533. [R. J. Mathar, Jan 03 2009]

LINKS

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

EXAMPLE

23 is a term because 2 and 3 are adjacent primes and 23 is divisible by 1 (the position of 2 in the sequence of primes).

127131 is a term because 127 and 131 are adjacent primes and 127131 is divisible by 31 (the position of 127 in the sequence of primes).

MAPLE

A055642 := proc(n) max(1, ilog10(n)+1) ; end: cat2 := proc(a, b) a*10^A055642(b)+b ; end: A045533 := proc(n) cat2(ithprime(n), ithprime(n+1)) ; end: for n from 1 to 800000 do if A045533(n) mod n = 0 then printf("%d, ", A045533(n)) ; fi; od: # R. J. Mathar, Jan 03 2009

MATHEMATICA

p = q = 2; c = 0; lst = {}; Do[c++; q = NextPrime@q; r = FromDigits@ Flatten[{IntegerDigits@ p, IntegerDigits@ q}]; If[Mod[r, c] == 0, AppendTo[lst, r]; Print[{c, r}]]; c++; q = NextPrime@ q; p = q, {n, 174254000}]; lst (* Robert G. Wilson v, Jan 23 2009 *)

CROSSREFS

Cf. A007795, A045533, A095958.

Cf. A000040.

Sequence in context: A305283 A166144 A007795 * A039346 A043169 A043949

Adjacent sequences:  A153350 A153351 A153352 * A153354 A153355 A153356

KEYWORD

nonn,base

AUTHOR

Gil Broussard, Dec 24 2008

EXTENSIONS

3 more terms from R. J. Mathar, Jan 03 2009

a(9)-a(14) from Robert G. Wilson v, Jan 23 2009

a(15) from Donovan Johnson, Aug 08 2010

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 June 19 00:55 EDT 2019. Contains 324217 sequences. (Running on oeis4.)