cp's OEIS Frontend

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.

A270777 Integers k such that A003266(k) is not divisible by k.

This page as a plain text file.
%I A270777 #14 Aug 09 2022 07:08:01
%S A270777 2,3,4,7,23,43,67,83,103,127,163,167,223,227,283,367,383,443,463,467,
%T A270777 487,503,523,547,587,607,643,647,683,727,787,823,827,863,883,887,907,
%U A270777 947,983,1063,1123,1163,1187,1283,1303,1327,1367,1423,1447,1487,1543,1567,1583,1607,1627,1663,1667
%N A270777 Integers k such that A003266(k) is not divisible by k.
%H A270777 Amiram Eldar, <a href="/A270777/b270777.txt">Table of n, a(n) for n = 1..1000</a>
%e A270777 4 is a term because 1*1*2*3 = 6 is not divisible by 4.
%t A270777 Select[Range@ 1680, ! Divisible[Fibonorial@ #, #] &] (* Version 10, or *)
%t A270777 Select[Range@ 1680, ! Divisible[Product[Fibonacci@ k, {k, #}], #] &] (* _Michael De Vlieger_, Mar 27 2016 *)
%o A270777 (PARI) t(n) = prod(k=1, n, Mod(fibonacci(k), n));
%o A270777 for(n=1, 2000, if(lift(t(n)) != 0, print1(n, ", ")));
%Y A270777 Complement of A270653.
%Y A270777 Cf. A000057, A003266.
%K A270777 nonn
%O A270777 1,1
%A A270777 _Altug Alkan_, Mar 22 2016