This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A334264 #25 Apr 25 2021 03:21:15 %S A334264 2,3,5,9,11,69,420,2361,12432,21565,28226,128389,274555,497269,836000, %T A334264 1151341,1973112,2202332,2458844,5402520 %N A334264 Numbers k > 1 such that (3/2)^k sets a new record for closest fractional part to 1/2. %p A334264 off := 1; for i from 2 to 1000 do t := (1+1/2)^i-floor((1+1/2)^i); d := abs(1/2-t); if d < off then off := d; print(i) end if end do %t A334264 dm = 1; r = 3/2; s = {}; Do[r *= 3/2; If[(d = Abs[r - Floor[r] - 1/2]) < dm, dm = d; AppendTo[s, n + 1]], {n, 1, 10^7}]; s (* _Amiram Eldar_, Jun 08 2020 *) %Y A334264 A081464 is also related to (3/2) to a power being a record distance from a value of an integer. %Y A334264 Cf. A002379, A034082, A179523. %K A334264 nonn,more %O A334264 1,1 %A A334264 _Ben Paul Thurston_, Apr 20 2020 %E A334264 a(8)-a(13) from _Amiram Eldar_, Jun 08 2020 %E A334264 a(14)-a(16) from _Chai Wah Wu_, Jul 02 2020 %E A334264 a(17)-a(20) from _Bert Dobbelaere_, Apr 25 2021