OFFSET
1,1
LINKS
Chris Caldwell, The First 1,008 Twin Primes.
EXAMPLE
The number of distinct prime factors of 35 (which is obtained from concatenating the twin primes 3 and 5) is 2, which is the first term of the sequence.
MATHEMATICA
Length[ FactorInteger[ # ]] & /@ FromDigits /@ Transpose[{Select[ Prime[ Range[550]], PrimeQ[ # + 2] &], Select[ Prime[ Range[550]], PrimeQ[ # - 2] &]}] (* Robert G. Wilson v, Jun 09 2005 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Parthasarathy Nambi, Jun 04 2005
EXTENSIONS
Edited, corrected and extended by Robert G. Wilson v, Jun 09 2005
STATUS
approved