|
%I #9 Jul 23 2013 13:22:32
%S 1,1,2,2,2,1,3,1,3,1,2,1,3,1,2,2,3,1,2,2,3,2,3,2,4,1,2,2,2,2,3,2,3,2,
%T 2,2,3,3,2,1,3,2,4,3,4,2,4,2,4,2,2,3,3,3,3,2,5,2,2,1,2,2,3,2,2,1,3,3,
%U 2,3,2,1,4,1,2,4,3,2,2,3,3,3,4,1,2,2,3,2,3,2,3,3,4,1,2,1,3,1,4,3,2,2,3,2,3
%N Total number of prime factors of n*rad(n)+1, where rad=A007947 (squarefree kernel).
%C a(n)=A001222(A078310(n)).
%H Reinhard Zumkeller, <a href="/A078314/b078314.txt">Table of n, a(n) for n = 1..10000</a>
%o (PARI) a(n)=bigomega(n*vecprod(factor(n)[,1])+1) \\ _Charles R Greathouse IV_, Jul 09 2013
%o (Haskell)
%o a078314 = a001222 . a078310 -- _Reinhard Zumkeller_, Jul 23 2013
%Y Cf. A078313, A078315.
%K nonn
%O 1,3
%A _Reinhard Zumkeller_, Nov 23 2002
|
