login
A328241
Numbers n for which A327860(n) = A003415(A276086(n)) is not a squarefree number.
2
0, 8, 13, 16, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, 36, 44, 45, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 64, 70, 72, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121
OFFSET
1,2
PROG
(PARI)
A327860(n) = { my(m=1, i=0, s=0, pr=1, nextpr); while((n>0), i=i+1; nextpr = prime(i)*pr; if((n%nextpr), my(e=((n%nextpr)/pr)); m *= (prime(i)^e); s += (e / prime(i)); n-=(n%nextpr)); pr=nextpr); (s*m); };
isA328241(n) = !issquarefree(A327860(n));
CROSSREFS
Cf. A328242 (complement).
Sequence in context: A214412 A080361 A054295 * A287159 A272486 A057486
KEYWORD
nonn
AUTHOR
Antti Karttunen, Oct 10 2019
STATUS
approved