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 A064362 #23 Jul 04 2025 12:37:21 %S A064362 5,8,10,12,13,15,16,17,20,21,24,25,26,28,30,32,33,34,35,36,37,39,40, %T A064362 42,45,48,50,51,52,53,55,56,57,60,61,63,64,65,66,68,69,70,72,73,74,75, %U A064362 77,78,80,84,85,87,88,89,90,91,92,93,95,96,97,99,100,102,104 %N A064362 Numbers k such that no Lucas number is a multiple of k. %C A064362 Any positive multiple of a member of this sequence is also a member. Primitive elements are in A124378. - _Franklin T. Adams-Watters_, Oct 28 2006 %C A064362 The Mathematica code for testing the number n works by generating the Lucas sequence (mod n) and stopping when either n divides a term of the sequence or the entire sequence (mod n) has been generated. Hence, up to A106291(n) terms need to be computed. - _T. D. Noe_, Mar 20 2013 %D A064362 Teruo Nishiyama, Fibonacci numbers, Suuri-Kagaku, No. 285, March 1987, 67-69, (in Japanese). %H A064362 T. D. Noe, <a href="/A064362/b064362.txt">Table of n, a(n) for n = 1..1000</a> %H A064362 B. Avila and T. Khovanova, <a href="http://arxiv.org/abs/1403.4614">Free Fibonacci Sequences</a>, arXiv preprint arXiv:1403.4614, 2014 and <a href="https://cs.uwaterloo.ca/journals/JIS/VOL17/Avila/avila4.html">J. Int. Seq. 17 (2014) # 14.8.5</a> %t A064362 test[ n_ ] := For[ a=1; b=3, True, t=b; b=Mod[ a+b, n ]; a=t, If[ b==0, Return[ True ] ]; If[ a==2&&b==1, Return[ False ] ] ]; Select[ Range[ 110 ], !test[ # ]& ] %Y A064362 Complement of A065156. %Y A064362 Cf. A000032, A124378. %K A064362 easy,nonn %O A064362 1,1 %A A064362 _Naohiro Nomoto_, Oct 15 2001 %E A064362 More terms from _Dean Hickerson_, Oct 18 2001