OFFSET
1,1
COMMENTS
a(n) = 0 if n is divisible by 3, 1111, 1507, 2849, 3367, 4849, 5291 or 7373. - Robert Israel, Feb 14 2024
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
a(3k) = 0 for k = 1, 2, 3, ....
a(n) = n*A088400(n). - R. J. Mathar, Aug 06 2019
MAPLE
A069530 := proc(n)
local m ;
if modp(n, 3) = 0 then
0 ;
else
for m from 1 do
if digsum(m*n) = 11 then
return m*n ;
end if;
end do:
end if;
end proc:
seq(A069530(n), n=1..70) ; # R. J. Mathar, Aug 06 2019
PROG
(PARI) sod(n) = {digs = digits(n); return (sum(i=1, #digs, digs[i])); }
a(n) = {if (n % 3 == 0, return (0)); k = 1; while (sod(k*n) != 11, k++); k; } \\ Michel Marcus, Sep 14 2013
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Apr 01 2002
EXTENSIONS
More terms from Sascha Kurz, Apr 08 2002
STATUS
approved