Search: id:A113222 Results 1-1 of 1 results found. %I A113222 %S A113222 0,1,2,3,5,3,13,21,34,6,89,5,233,14,7,987,1597,35,4181,8,15,90,28657,23, %T A113222 75025,234,196418,16,514229,8,1346269,2178309,91,1598,18,37,24157817, %U A113222 4182,235,26,165580141,16,433494437,92,39,28658,2971215073,989 %N A113222 a(n) = sum{p=primes, p|n} F(p^(m_{n,p})), where p^(m_{n,p}) is highest power of p dividing n, m= nonnegative integer and F(k) is the k-th Fibonacci number. %H A113222 Leroy Quet, Home Page (listed in lieu of email address) %F A113222 Additive with a(p^e) = F(p^e). %e A113222 12 = 2^2 * 3^1. So a(12) = F(2^2) + F(3^1) = 3 + 2 = 5. %t A113222 f[n_] := Plus @@ (Fibonacci[ #[[1]]^#[[2]]] & /@ FactorInteger[n]); Table[ f[n], {n, 49}] (* Robert G. Wilson v *) %Y A113222 Cf. A113195. %Y A113222 Sequence in context: A125677 A051358 A107473 this_sequence A060444 A152814 A021981 %Y A113222 Adjacent sequences: A113219 A113220 A113221 this_sequence A113223 A113224 A113225 %K A113222 nonn %O A113222 1,3 %A A113222 Leroy Quet Oct 18 2005 %E A113222 More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Oct 21 2005 Search completed in 0.001 seconds