login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A281071 Largest number k such that b - r is even or r = 0 for all b = 1..k where r = n mod b. 2

%I #13 Jan 23 2017 23:17:21

%S 1,2,1,4,1,6,1,2,1,10,1,4,1,2,1,6,1,6,1,2,1,4,1,4,1,2,1,10,1,6,1,2,1,

%T 4,1,12,1,2,1,8,1,4,1,2,1,6,1,6,1,2,1,4,1,4,1,2,1,6,1,6,1,2,1,4,1,14,

%U 1,2,1,10,1,4,1,2,1,6,1,8,1,2,1,4,1,4,1,2,1,6,1,6,1,2,1,4,1,8,1,2

%N Largest number k such that b - r is even or r = 0 for all b = 1..k where r = n mod b.

%C Consider a text mode screen which is a fixed number of character columns wide. Text only breaks at the screen width, there is no manual line break. Then a(n) is the largest screen width in terms of characters so that a string of n printable characters can be perfectly centrally aligned on this and all smaller widths.

%C a(n) = n for n in {1, 2, 4, 6, 10}, otherwise a(n) < n. The sequence is unbounded.

%H Martin Janecke, <a href="/A281071/b281071.txt">Table of n, a(n) for n = 1..10000</a>

%e a(22) = 4 because

%e 22 mod 1 = 0 where r = 0,

%e 22 mod 2 = 0 where r = 0,

%e 22 mod 3 = 1 where 3 - 1 is even,

%e 22 mod 4 = 2 where 4 - 2 is even, but

%e 22 mod 5 = 2 where r > 0 and 5 - 2 is odd.

%o (PARI) a(n) = {ok = 1; k = 1; while(ok, v = vector(k, b, if ((n % b)==0, 0, b - (n%b))); ok = #select(x->((x % 2)==0), v) == k; if (ok, k++);); k--;} \\ _Michel Marcus_, Jan 23 2017

%Y Cf. A281072.

%K easy,nonn

%O 1,2

%A _Martin Janecke_, Jan 14 2017

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 24 05:44 EDT 2024. Contains 371918 sequences. (Running on oeis4.)