Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A154484
a(n+1)-+a(n) = prime, a(1)=0, a(2)=2.
13
0, 2, 5, 8, 11, 18, 23, 30, 37, 42, 47, 50, 53, 56, 75, 82, 85, 88, 91, 102, 109, 114, 119, 122, 129, 134, 137, 140, 143, 150, 157, 160, 171, 176, 183, 190, 193, 196, 201, 208, 211, 222, 227, 230, 233, 246, 253, 256, 267, 274, 297, 302, 305, 308, 311, 330, 343
OFFSET
1,2
COMMENTS
Sum and difference of any of two consecutive numbers are prime numbers: 5-2=3; 5+2=7, 230-227=3; 230+227=457, 233-230=3; 233+230=463,...
I assume that here and in most of the similar sequences from the same author there is an implicit assumption that we want the "Lexicographically earliest infinite sequence of distinct positive numbers" that satisfies the stated condition. - N. J. A. Sloane, Apr 20 2022
MATHEMATICA
a=0; b=2; lst={a, b}; Do[If[PrimeQ[n-b]&&PrimeQ[n+b], AppendTo[lst, n]; a=b; b=n], {n, 3, 7!}]; lst
CROSSREFS
Sequence in context: A344719 A192147 A226817 * A129300 A347839 A107679
KEYWORD
nonn
AUTHOR
EXTENSIONS
NAME adapted to offset. - R. J. Mathar, Jun 19 2021
STATUS
approved