A295389 Numbers whose sum of digits is squarefree.
1, 2, 3, 5, 6, 7, 10, 11, 12, 14, 15, 16, 19, 20, 21, 23, 24, 25, 28, 29, 30, 32, 33, 34, 37, 38, 41, 42, 43, 46, 47, 49, 50, 51, 52, 55, 56, 58, 59, 60, 61, 64, 65, 67, 68, 69, 70, 73, 74, 76, 77, 78, 82, 83, 85, 86, 87, 89, 91, 92, 94, 95, 96, 98, 100, 101, 102, 104, 105, 106, 109, 110, 111, 113, 114
Offset: 1
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Programs
-
Maple
select(n -> numtheory:-issqrfree(convert(convert(n,base,10),`+`)), [$1..200]); # Robert Israel, Nov 21 2017
-
PARI
is(n) = issquarefree(sumdigits(n)); for(n = 1, 200, if(is(n), print1(n,", ")))
Comments