[go: up one dir, main page]

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!)
A057108 Difference between the smallest number S(n) with S(n)! a multiple of n and the largest prime factor of n [taking a(1)=0]. 3
0, 0, 0, 2, 0, 0, 0, 2, 3, 0, 0, 1, 0, 0, 0, 4, 0, 3, 0, 0, 0, 0, 0, 1, 5, 0, 6, 0, 0, 0, 0, 6, 0, 0, 0, 3, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 3, 7, 5, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 0, 0, 6, 0, 0, 0, 0, 0, 0, 0, 3, 0, 0, 5, 0, 0, 0, 0, 1, 6, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 5, 0, 7, 0, 5, 0, 0, 0, 0, 0 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,4
REFERENCES
Steven R. Finch, Mathematical Constants, Cambridge, 2003, pp. 284-292.
LINKS
Steven R. Finch, The Average Value of the Smarandache Function [Broken link]
FORMULA
a(n) = A002034(n) - A006530(n).
EXAMPLE
a(12)=1 since 12 is a factor of 4!, 3 is the largest prime factor of 12 and 4-3=1
PROG
(PARI)
A002034(n) = if(1==n, n, my(s=factor(n)[, 1], k=s[#s], f=Mod(k!, n)); while(f, f*=k++); (k)); \\ After code in A002034.
A006530(n) = if(n>1, vecmax(factor(n)[, 1]), 1); \\ From A006530.
A057108(n) = (A002034(n) - A006530(n)); \\ Antti Karttunen, Jul 22 2018
CROSSREFS
Sequence in context: A343873 A054923 A263145 * A349435 A063958 A349434
KEYWORD
easy,nonn
AUTHOR
Henry Bottomley, Aug 08 2000
EXTENSIONS
More terms from James A. Sellers, Aug 22 2000
STATUS
approved

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 August 29 09:16 EDT 2024. Contains 375511 sequences. (Running on oeis4.)