login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A046460
Number of prime factors of concatenation of numbers from 1 up to n, with multiplicity.
10
0, 3, 2, 2, 3, 8, 2, 5, 4, 3, 6, 6, 3, 3, 3, 4, 5, 6, 6, 10, 8, 6, 4, 6, 5, 9, 8, 7, 4, 7, 3, 6, 6, 2, 8, 9, 4, 4, 6, 9, 5, 7, 4, 7, 10, 7, 5, 8, 6, 10, 3, 9, 8, 14, 5, 5, 6, 4, 4, 8, 3, 8, 5, 10, 6, 8, 3, 10, 7, 6, 6, 7, 3, 9, 6, 6, 5, 6, 6, 10, 6, 7, 6, 7, 6
OFFSET
1,2
MATHEMATICA
Join[{1}, Table[PrimeOmega[FromDigits[Flatten[IntegerDigits[Range[i]]]]], {i, 2, 35}]] (* Jayanta Basu, Jun 02 2013 *)
PROG
(PARI) conc(n) = my(s=""); for(k=1, n, s=Str(s, k)); eval(s); \\ A007908
a(n) = bigomega(conc(n)); \\ Michel Marcus, Oct 16 2019
KEYWORD
nonn,hard,base
AUTHOR
Patrick De Geest, Aug 15 1998
EXTENSIONS
Offset 1 and a(1)=0 from Michel Marcus, Oct 16 2019
More terms from Sean A. Irvine, Apr 10 2021
STATUS
approved