(MAGMAMagma) conc:=func<a, b|a*10^(#Intseq(b))+b>; [p:p in PrimesUpTo(17000)| IsPrime(conc(p, (NextPrime(p)))) and IsPrime(conc(NextPrime(p), p))]; // Marius A. Burtea, Jan 25 2020
(MAGMAMagma) conc:=func<a, b|a*10^(#Intseq(b))+b>; [p:p in PrimesUpTo(17000)| IsPrime(conc(p, (NextPrime(p)))) and IsPrime(conc(NextPrime(p), p))]; // Marius A. Burtea, Jan 25 2020
Marius A. Burtea, <a href="/A225575/b225575_1.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..250 from Paolo P. Lava)
proposed
approved
editing
proposed
199, 233, 257, 353, 523, 653, 971, 1973, 2333, 3259, 3637, 3761, 4283, 4993, 5927, 6353, 6529, 6563, 7907, 8831, 9293, 9851, 10711, 10861, 11731, 13037, 13177, 13681, 15241, 16381, 16693, 16931, 18341, 18899, 19577, 21787, 23857, 24071, 28621, 31657, 32911
reviewed
editing
proposed
reviewed
editing
proposed
This sequence was suggested by Puzzle 687 at Prime Puzzles (see Links).
In general, q-p == 0 (mod 6). - Zak Seidov, May 11 2013
Marius A. Burtea, <a href="/A225575/b225575_1.txt">Table of n, a(n) for n = 1..10000</a> (terms 1 - ..250 from Paolo. P. Lava.)
proposed
editing
editing
proposed
Carlos Rivera, <a href="http://www.primepuzzles.net/puzzles/puzz_687.htm">Puzzle 687: 17769643</a>, The Prime Puzzles & Problems and PuzzlesConnection.
proposed
editing