1,2

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)).

Table of n, a(n) for n=1..67.

L. Carlitz, R. Scoville and T. Vaughan, Some arithmetic functions related to Fibonacci numbers, Fib. Quart., 11 (1973), 337-386.

(Haskell)

import Data.List (transpose)

a247419 n = a247419_list !! (n-1)

a247419_list = concat $

transpose [map (subtract 1) a003256_list, a003256_list]

-- Reinhard Zumkeller, Oct 03 2014

Sequence in context: A057904 A188397 A027925 * A039245 A039188 A288168

Adjacent sequences: A247416 A247417 A247418 * A247420 A247421 A247422

nonn

Eric M. Schmidt, Sep 16 2014

approved