|
|
A007794
|
|
Juxtapose pairs of primes (starting at 1).
|
|
1
|
|
|
12, 35, 711, 1317, 1923, 2931, 3741, 4347, 5359, 6167, 7173, 7983, 8997, 101103, 107109, 113127, 131137, 139149, 151157, 163167, 173179, 181191, 193197, 199211, 223227, 229233
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
L:= [1, seq(ithprime(i), i=1..99)]:
seq(L[2*k-1]*10^(1+ilog10(L[2*k]))+L[2*k], k=1..50); # Robert Israel, Jun 28 2018
|
|
MATHEMATICA
|
#[[1]]*10^IntegerLength[#[[2]]]+#[[2]]&/@Partition[Join[{1}, Prime[ Range[ 51]]], 2] (* Harvey P. Dale, Jul 12 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
bmoore(AT)artemis.ess.ucla.edu (William B. Moore)
|
|
STATUS
|
approved
|
|
|
|