login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Numbers not in a Fibonacci sequence starting with two 1-digit numbers.
3

%I #30 Aug 23 2017 11:13:48

%S 106,114,119,122,127,130,132,135,140,143,145,148,151,153,156,158,161,

%T 164,166,169,171,172,174,177,179,182,184,185,187,190,192,193,195,197,

%U 198,200,203,205,206,208,210,211,213,214,216,218,219,221,224,226

%N Numbers not in a Fibonacci sequence starting with two 1-digit numbers.

%H Charles R Greathouse IV, <a href="/A277605/b277605.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = n + O(log n). - _Charles R Greathouse IV_, Oct 30 2016

%e 106 is in this sequence because it is not in any Fibonacci sequence starting with two 1-digit numbers.

%t With[{nn = 226}, Complement[Range@ nn, TakeWhile[Union@ Flatten@ Map[LinearRecurrence[{1, 1}, #, 1 + Floor[1/2 + Log[GoldenRatio, Sqrt[5] nn]]] &, Tuples[Range@ 9, 2]], # <= nn &]]] (* _Michael De Vlieger_, Aug 19 2017 *)

%o (PARI) is(n)=if(n<106, return(0)); for(a=1,9, for(b=1,9, my(x=a,y=a+b); while(y<n, [x,y]=[y,x+y]); if(y==n, return(0)))); 1 \\ _Charles R Greathouse IV_, Oct 30 2016

%Y Cf. A000045, A291179.

%K base,nonn

%O 1,1

%A _Bobby Jacobs_, Oct 23 2016

%E More terms from _Bobby Jacobs_, Oct 29 2016