login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A138258 Smallest positive integer m such that n divides [5^m/m] (=A129795(m)). 9
1, 2, 2, 2, 1, 2, 6, 7, 7, 7, 22, 2, 4, 6, 7, 13, 16, 7, 10, 7, 6, 31, 55, 7, 5, 4, 19, 6, 15, 7, 6, 17, 31, 16, 13, 7, 36, 10, 4, 7, 3, 6, 42, 31, 7, 55, 51, 13, 43, 26, 16, 4, 52, 19, 31, 13, 18, 15, 27, 7, 31, 6, 13, 17, 17, 31, 9, 16, 67, 13, 11, 7, 66, 36, 26, 18, 31, 4, 9, 13, 56, 61 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

This sequence is well-defined.

LINKS

Robert Israel, Table of n, a(n) for n = 1..10000

1st Romanian Master in Mathematics (RMIM), Problem 3, Bucharest, 2008.

MAPLE

N:= 100: # for a(1)..a(N)

V:= Vector(N):

count:= 0: missing:= {$1..N}:

Q:= ilcm(seq(i, i=1..N)):

for m from 1 while count < N do

  v:= floor(5^m/m);

  r:= igcd(v, Q);

  d:= select(t -> r mod t = 0, missing);

  missing:= missing minus d;

  count:= count+nops(d);

  V[convert(d, list)]:= m;

od:

convert(V, list); # Robert Israel, Aug 27 2020

CROSSREFS

Cf. A129795, A138255, A138256, A138257, A138259, A138260, A138261, A138262, A138263.

Sequence in context: A198199 A124369 A205013 * A308367 A205599 A327891

Adjacent sequences:  A138255 A138256 A138257 * A138259 A138260 A138261

KEYWORD

nonn

AUTHOR

Max Alekseyev, Mar 09 2008

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 11 22:01 EDT 2021. Contains 342888 sequences. (Running on oeis4.)