# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a120483
Showing 1-1 of 1

%I A120483 #2 Oct 02 2013 15:12:52
%S A120483 2,7,9,8,9,3,6,6,3,3,5,7,5,0,2,3,8,3,2,3,2,2,7,6,0,4,1,4,3,4,1,5,0,1,
%T A120483 6,1,5,1,2,4,0,1,1,8,7,6,4,2,4,4,0,3,1,2,8,7,0,3,5,8,5,0,9,2,2,3,1,5,
%U A120483 3,3,9,8,6,1,6,7,2,6,6,6,9,7,2,6,4,9,5,8,0,9,0,4,0,0,9,0,7,6,6,2
%N A120483 Decimal expansion of s = sum_{i=1..infinity} (1/c(i))^i, where c(i) is the i-th composite number.
%e A120483 Sum is (1/4)^1 + (1/6)^2 + (1/8)^3 + (1/9)^4 + (1/10)^5 + ... = 0.279893663...
%t A120483 k = s = 0; Do[If[ !PrimeQ[n], k++; s += (1/n)^k], {n, 2, 100}]; First[RealDigits[N[s, 100]]]
%K A120483 cons,nonn
%O A120483 1,1
%A A120483 _Ryan Propper_, Jul 21 2006

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE