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 A247419 #10 Jan 05 2025 19:51:40 %S A247419 1,2,4,5,6,7,8,9,11,12,13,14,16,17,18,19,20,21,23,24,25,26,27,28,30, %T A247419 31,32,33,35,36,37,38,39,40,42,43,44,45,46,47,48,49,50,51,53,54,55,56, %U A247419 57,58,60,61,62,63,65,66,67,68,69,70,72,73,74,75,76,77,79 %N A247419 a(2n) = A003256(n); a(2n-1) = A003256(n) - 1. %C A247419 This is the function named w in [Carlitz] (cf. Thm. 7.9), which defines this sequence by the property A242094(a(n)) is the n-th positive integer not of the form A000201(A001950(m)). %H A247419 L. Carlitz, R. Scoville and T. Vaughan, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Scanned/11-4/carlitz.pdf">Some arithmetic functions related to Fibonacci numbers</a>, Fib. Quart., 11 (1973), 337-386. %o A247419 (Haskell) %o A247419 import Data.List (transpose) %o A247419 a247419 n = a247419_list !! (n-1) %o A247419 a247419_list = concat $ %o A247419 transpose [map (subtract 1) a003256_list, a003256_list] %o A247419 -- _Reinhard Zumkeller_, Oct 03 2014 %K A247419 nonn %O A247419 1,2 %A A247419 _Eric M. Schmidt_, Sep 16 2014