[go: up one dir, main page]

login
Revision History for A073834 (Bold, blue-underlined text is an addition; faded, red-underlined text is a deletion.)

Showing entries 1-10 | older changes
Denominators of b(n) where b(1) = 1, b(i) = b(i-1) + 1/b(i-1).
(history; published version)
#22 by Michael De Vlieger at Fri May 06 07:37:09 EDT 2022
STATUS

proposed

approved

#21 by Eric W. Weisstein at Fri May 06 07:34:58 EDT 2022
STATUS

editing

proposed

#20 by Eric W. Weisstein at Fri May 06 07:34:57 EDT 2022
LINKS

Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/MycielskiGraph.html">Mycielski Graph</a>

STATUS

approved

editing

#19 by N. J. A. Sloane at Tue Aug 18 15:45:28 EDT 2020
STATUS

editing

approved

#18 by N. J. A. Sloane at Tue Aug 18 15:45:26 EDT 2020
AUTHOR

_Alex Fink (finks(AT)telus.net), _, Aug 12 2002

STATUS

approved

editing

#17 by Charles R Greathouse IV at Wed Apr 30 01:34:06 EDT 2014
PROG

(PARI) {a(n) = local(x, y); if( n<1, 0, if( n<3, n, x = a(n-2)^2; y = a(n-1); y*y + x * (y - x)))} /* _Michael Somos, _, Mar 05 2012 */

Discussion
Wed Apr 30
01:34
OEIS Server: https://oeis.org/edit/global/2177
#16 by Russ Cox at Sat Mar 31 21:03:44 EDT 2012
MATHEMATICA

Denominator[NestList[# + 1/# &, 1, 10]] (* _Eric W. Weisstein (eric(AT)weisstin.com), _, Mar 05 2011 *)

Discussion
Sat Mar 31
21:03
OEIS Server: https://oeis.org/edit/global/1338
#15 by Russ Cox at Fri Mar 30 18:52:13 EDT 2012
MATHEMATICA

f[n_]:=n+1/n; Prepend[Denominator[NestList[f, 2, 9]], 1] (* _Vladimir Joseph Stephan Orlovsky (4vladimir(AT)gmail.com), _, Nov 19 2010 *)

Discussion
Fri Mar 30
18:52
OEIS Server: https://oeis.org/edit/global/254
#14 by Russ Cox at Fri Mar 30 17:35:11 EDT 2012
COMMENTS

a(n) is also the denominator of the fractional chromatic number of the Mycielski graph M_n - _Eric W. Weisstein (eric(AT)weisstein.com), _, Mar 05 2011

Discussion
Fri Mar 30
17:35
OEIS Server: https://oeis.org/edit/global/166
#13 by T. D. Noe at Mon Mar 05 17:38:12 EST 2012
STATUS

proposed

approved