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

 

Logo

Revision History for A048098

(Underlined text is an ; strikethrough text is a deletion.)

Showing entries 1-10 | older changes
A048098 Numbers k that are sqrt(k)-smooth: if p | k then p^2 <= k when p is prime.
(history; published version)
#58 by Michel Marcus at Sun Sep 01 10:32:08 EDT 2024
STATUS

reviewed

#57 by Joerg Arndt at Sun Sep 01 10:23:41 EDT 2024
STATUS

proposed

#56 by Chai Wah Wu at Sun Sep 01 10:21:13 EDT 2024
STATUS

editing

#55 by Chai Wah Wu at Sun Sep 01 10:21:07 EDT 2024
PROG

return bisection(f) # Chai Wah Wu, Sep 01 2024

#54 by Chai Wah Wu at Sun Sep 01 10:20:58 EDT 2024
PROG

STATUS

approved

#53 by Alois P. Heinz at Wed Jan 05 12:45:56 EST 2022
STATUS

proposed

#52 by F. Chapoton at Wed Jan 05 12:42:37 EST 2022
STATUS

editing

#51 by F. Chapoton at Wed Jan 05 12:42:26 EST 2022
PROG

(PARI) for(n=1, 1000, if(vecmax(factor(n)[, 1])<=sqrt(n), print1(n, ", ")))

def ok(n): return n == 1 if n < 2 else max(factorint(n))**2 <= n

STATUS

approved

Discussion
Wed Jan 05 12:42
F. Chapoton: fix broken pari code
#50 by Michel Marcus at Wed Dec 22 07:42:30 EST 2021
STATUS

reviewed

#49 by Joerg Arndt at Wed Dec 22 07:05:24 EST 2021
STATUS

proposed

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 September 6 22:26 EDT 2024. Contains 375728 sequences. (Running on oeis4.)