The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A242730 Decimal expansion of the Conway-Guy constant, a constant associated with Erdős' sum-distinct set constant. 0
 2, 3, 5, 1, 2, 5, 2, 8, 4, 8, 1, 1, 1, 7, 4, 8, 6, 5, 6, 3, 5, 5, 8, 8, 1, 7, 4, 3, 9, 1, 8, 7, 9, 0, 0, 9, 8, 8, 0, 9, 8, 4, 5, 1, 9, 5, 8, 3, 5, 2, 9, 5, 9, 8, 5, 8, 2, 6, 7, 7, 9, 6, 6, 3, 1, 6, 7, 0, 3, 1, 9, 0, 5, 1, 3, 7, 1, 3, 2, 4, 8, 7, 4, 7, 1, 4, 0, 9, 0, 0, 0, 0, 1, 5, 0, 0, 3, 1, 1, 7 (list; constant; graph; refs; listen; history; text; internal format)
 OFFSET 0,1 REFERENCES J. H. Conway and R. K. Guy, “Sets of Natural Numbers with Distinct Sums,” Notices Amer. Math. Soc., vol. 15, 1968. Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Section 2.28, p. 189. LINKS W. F. Lunnon, Integer sets with distinct subset-sums, Math. Comp. 50 (1988), 297-320. EXAMPLE 0.23512528481117486563558817439187900988... MATHEMATICA digits = 100; Clear[v, s]; v[n_] := v[n] = 2*v[n-1] - v[n-1 - Floor[1/2 + Sqrt[2*(n-1)]]]; v[0] = 0; v[1] = 1; s[k_] := s[k] = v[k]/2^k // N[#, digits + 5] &; s[dk = 250]; s[k = 2*dk]; While[RealDigits[s[k], 10, digits] != RealDigits[s[k - dk], 10, digits],  Print["k = ", k]; k = k + dk]; RealDigits[s[k], 10, digits] // First CROSSREFS Cf. A002083, A005255. Sequence in context: A030604 A007880 A004573 * A123962 A256888 A010585 Adjacent sequences:  A242727 A242728 A242729 * A242731 A242732 A242733 KEYWORD nonn,cons AUTHOR Jean-François Alcover, May 21 2014 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 18 12:35 EDT 2021. Contains 347527 sequences. (Running on oeis4.)