login
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
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
Sequence in context: A103472 A009649 A195539 * A008653 A038006 A205967
KEYWORD
nonn,base
AUTHOR
bmoore(AT)artemis.ess.ucla.edu (William B. Moore)
STATUS
approved