A007795 Juxtapose pairs of primes.
23, 57, 1113, 1719, 2329, 3137, 4143, 4753, 5961, 6771, 7379, 8389, 97101, 103107, 109113, 127131, 137139, 149151, 157163, 167173, 179181, 191193, 197199, 211223, 227229, 233239, 241251, 257263, 269271, 277281, 283293, 307311, 313317, 331337, 347349, 353359
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[Seqint(Intseq(NthPrime(n+1)) cat Intseq(NthPrime(n))): n in [1..86 by 2]]; // Vincenzo Librandi, Jan 05 2018
-
Mathematica
FromDigits[Flatten[IntegerDigits/@#]]&/@Partition[Prime[ Range[150]],2] (* Harvey P. Dale, May 06 2011 *)
Extensions
More terms from Harvey P. Dale, May 06 2011