Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A072298
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A072298 Smallest integer k such that for no integer m, m! is divisible by n^k but not by n^(k+1). +0
1
2, 3, 6, 5, 3, 7, 4, 12, 5, 11, 7, 13, 7, 5, 62, 17, 12, 19, 5, 7, 11, 23, 4, 30, 13, 39, 7, 29, 5, 31, 37, 11, 17, 7, 12, 37, 19, 13, 5, 41, 7, 43, 11, 23, 23, 47, 62, 56, 30, 17, 13, 53, 39, 11, 7, 19, 29, 59, 5, 61, 31, 7, 84, 13, 11, 67, 17, 23, 7, 71, 12, 73, 37, 30, 19, 11 (list; graph; listen)
OFFSET

2,1

COMMENT

If p is a prime, the p-th term is p.

MAPLE

for b from 2 do if isprime(b) then print(b): next: end if: L := ifactors(b)[2]: last := 0: for n from 2 to 10000 do C := [seq(0, i=1..nops(L))]: for i from 1 while 2^i <= n do for j from 1 to nops(L) do C := subsop(j=C[j]+floor(n/(L[j][1])^i), C): end do: end do: for j from 1 to nops(L) do C := subsop(j=floor(C[j]/(L[j][2])), C): end do: new := min(op(C)): if last + 1 < new then print(last+1): break: end if: last := new: end do: end do:

CROSSREFS

Sequence in context: A136315 A011159 A091556 this_sequence A130686 A056023 A133259

Adjacent sequences: A072295 A072296 A072297 this_sequence A072299 A072300 A072301

KEYWORD

nonn

AUTHOR

Asger E. Grunnet (asger(AT)adslhome.dk), Jul 13 2002

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified December 17 23:40 EST 2009. Contains 171025 sequences.


AT&T Labs Research