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 A298685 #11 Feb 07 2018 12:14:13 %S A298685 540,1200,1620,3060,5580,9180,9900,12600,13440,13680,18300,19440, %T A298685 19800,21000,24480,36900,43200,49680,50220,54120,57240,61560,65880, %U A298685 81180,83700,103680,104160,154080,155520,156060,156240,202440,229320,252000,279000,298200,302940 %N A298685 Numbers i such that Fibonacci(i) is divisible by i, i+1, i+2, and i+3. %C A298685 A subsequence of A298684. %H A298685 Chai Wah Wu, <a href="/A298685/b298685.txt">Table of n, a(n) for n = 1..1000</a> %t A298685 Select[Range[10^5], Function[{i, j}, AllTrue[i + Range[0, 3], Divisible[j, #] &]] @@ {#, Fibonacci@ #} &] (* _Michael De Vlieger_, Jan 28 2018 *) %o A298685 (PARI) isone(n, k) = !(fibonacci(n) % (n+k)); %o A298685 isok(n) = isone(n,0) && isone(n,1) && isone(n,2) && isone(n,3); \\ _Michel Marcus_, Jan 29 2018 %Y A298685 Cf. A000045, A023172, A217738, A221018, A225219, A298684. %K A298685 nonn %O A298685 1,1 %A A298685 _Alex Ratushnyak_, Jan 24 2018