|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
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
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|