id:A139396 - OEIS Search Results

Search: id:A139396

Displaying 1-1 of 1 results found.

page 1

Decimal expansion of the alternating sum 1/p(1)-1/[p(2)*p(3)]+1/[p(4)*p(5)*p(6)]...., where p(n) is the n-th prime.

+0
2

5, 6, 5, 6, 7, 2, 2, 9, 6, 8, 0, 3, 0, 6, 1, 8, 9, 7, 7, 0, 3, 8, 4, 2, 4, 8, 6, 9, 7, 5, 1, 6, 2, 7, 6, 3, 2, 5, 7, 2, 0, 8, 6, 1, 0, 7, 2, 2, 8, 0, 3, 2, 2, 0, 6, 1, 4, 4, 7, 3, 9, 8, 5, 8, 5, 5, 7, 8, 8, 4, 9, 4, 5, 8, 3, 9, 0, 5, 3, 1, 9, 5, 9, 2, 6, 1, 0, 3, 8, 0, 1, 3, 1, 3, 8, 5, 7, 0, 8, 4 (list; cons; graph; listen)

	OFFSET	`0,1`
	COMMENT	`Absolute difference between this number and A139395 is about 0.002.`
	MAPLE	`P:=proc(n) local a, b, i, j, k; a:=0.5; k:=1; for i from 2 by 1 to n do b:=1; for j from k by 1 to k+i-1 do b:=b1/ithprime(j+1); od; k:=j; a:=evalf(a+b(-1)^i, 105); od; print(a); end: P(100);`
	CROSSREFS	`Cf. A139395.` `Sequence in context: A006944 A010717 A046603 this_sequence A010487 A011258 A157339` `Adjacent sequences: A139393 A139394 A139395 this_sequence A139397 A139398 A139399`
	KEYWORD	`easy,nonn,cons`
	AUTHOR	`Paolo P. Lava & Giorgio Balzarotti (ppl(AT)spl.at), Apr 18 2008`

page 1

Search completed in 0.002 seconds

Last modified December 15 00:47 EST 2009. Contains 170825 sequences.

AT&T Labs Research