|
Search: id:A107770
|
|
|
| A107770 |
|
Numbers n such that Prime[n]-Prime[n-1] =2 |
|
+0 1
|
|
| 3, 4, 6, 8, 11, 14, 18, 21, 27, 29, 34, 36, 42, 44, 46, 50, 53, 58, 61, 65, 70, 82, 84, 90, 99, 105, 110, 114, 117, 121, 141, 143, 145, 149, 153, 172, 174, 177, 179, 183, 191
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
The definition "Numbers n such that Prime[n]-Prime[n-1] =2" is wrong. This sequence are numbers n such that Prime[n] * Prime[n-1] = n*n -1. [From Ctibor O. Zizka (c.zizka(AT)email.cz), Mar 24 2009]
|
|
MATHEMATICA
|
a = Flatten[Table[If[Prime[j] - Prime[j - 1] == 2, j, {}], {j, 2, 200}]]
|
|
CROSSREFS
|
Cf. A000040.
Sequence in context: A060903 A079401 A156040 this_sequence A067054 A039893 A050115
Adjacent sequences: A107767 A107768 A107769 this_sequence A107771 A107772 A107773
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Jun 11 2005
|
|
|
Search completed in 0.002 seconds
|