login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A252629 a(n) = A064735(n) -  A000040(n). 2
21, 10, 48, 10, 102, 100, 156, 172, 200, 200, 100, 100, 200, 388, 300, 300, 300, 400, 100, 200, 100, 100, 200, 300, 100, 912, 928, 5000, 982, 2000, 1150, 1188, 1236, 1260, 1344, 1000, 1414, 1000, 3000, 1560, 2000, 1000, 1722, 1000, 1776, 1794, 1900, 1000, 2046, 1000, 2100, 2000 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Zak Seidov, Table of n, a(n) for n = 1..2000

MATHEMATICA

p = 1; s = {}; m = 100; Do[p = NextPrime[p]; idp = IntegerDigits[p]; le = Length[idp]; q = p; Label[1]; q = NextPrime[q]; par = Partition[IntegerDigits[q], le, 1]; If[MemberQ[par, idp], AppendTo[s, q - p]; Goto[2], Goto[1]]; Label[2], {m}]; s(*for first m terms*)

CROSSREFS

Cf. A000040, A064735.

Sequence in context: A040423 A318648 A033341 * A213217 A300505 A086981

Adjacent sequences:  A252626 A252627 A252628 * A252630 A252631 A252632

KEYWORD

nonn

AUTHOR

Zak Seidov, Dec 19 2014

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 18 23:10 EDT 2021. Contains 345125 sequences. (Running on oeis4.)