login
A276381
Numbers n such that there exist a number k with A007953(n) = A007953(k*n) and 1 < k < 10.
1
3, 6, 9, 15, 18, 27, 30, 33, 36, 39, 45, 48, 51, 54, 57, 60, 63, 66, 69, 72, 75, 78, 81, 84, 87, 90, 93, 96, 99, 105, 108, 117, 126, 129, 135, 138, 144, 147, 150, 153, 156, 159, 162, 165, 168, 171, 174, 177, 180, 183, 186, 189, 192, 195, 198, 207, 216, 219, 225, 228, 234, 243
OFFSET
1,1
COMMENTS
From Robert Israel, Dec 29 2020: (Start)
If n is a term, so are 10*n and (10^m+1)*n where 10^(m-1) > n.
All terms are divisible by 3. (End)
LINKS
EXAMPLE
15 is a term because A007953(15) = A007953(4*15).
MAPLE
filter:= proc(n) local t, k;
t:= digsum(n);
for k from 2 to 9 do if digsum(k*n)=t then return true fi od;
false
end proc:
select(filter, [seq(i, i=3..1000, 3)]); # Robert Israel, Dec 29 2020
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Altug Alkan, Sep 04 2016
STATUS
approved