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.

A135366 a(n) is the smallest nonnegative k such that n divides 2^k + k.

This page as a plain text file.
%I A135366 #14 Mar 15 2020 02:43:47
%S A135366 0,2,1,4,4,2,6,8,7,4,3,8,12,6,7,16,16,14,18,4,19,8,22,8,33,12,7,40,11,
%T A135366 26,23,32,8,16,6,32,5,18,37,24,40,38,42,8,7,22,10,32,61,84,38,12,35,
%U A135366 32,46,40,32,28,24,44
%N A135366 a(n) is the smallest nonnegative k such that n divides 2^k + k.
%C A135366 a(2^m) = 2^m for m > 0. If p is an odd prime then by Fermat, a(p) <= p-1. 25 is the smallest n with a(n) > n.
%H A135366 Harvey P. Dale, <a href="/A135366/b135366.txt">Table of n, a(n) for n = 1..1000</a>
%H A135366 International Mathematical Olympiad, <a href="http://www.imo-official.org/problems/IMO2006SL.pdf">Problem N7</a>, IMO-2006, p. 63.
%e A135366 a(9)=7 since 2^7 + 7 = 9*15 and 2^k + k is not divisible by 9 for 0 <= k < 7.
%t A135366 sk[n_]:=Module[{k=0},While[!Divisible[2^k+k,n],k++];k]; Array[sk,60] (* _Harvey P. Dale_, Jun 01 2013 *)
%o A135366 (PARI) a(n) = for(m=0, oo, if(Mod(2, n)^m==-m, return(m))); \\ _Jinyuan Wang_, Mar 15 2020
%Y A135366 Cf. A135359, A247248.
%K A135366 nonn
%O A135366 1,2
%A A135366 _John L. Drost_, Feb 16 2008
%E A135366 Corrected by _Harvey P. Dale_, Jun 01 2013