[go: up one dir, main page]

login
A308262
Numbers m such that A048385(m) ends with m.
1
0, 1, 5, 6, 10, 11, 25, 36, 50, 51, 60, 61, 100, 101, 110, 111, 250, 251, 360, 361, 425, 500, 501, 510, 511, 600, 601, 610, 611, 936, 1000, 1001, 1010, 1011, 1100, 1101, 1110, 1111, 1936, 2500, 2501, 2510, 2511, 3600, 3601, 3610, 3611, 4250, 4251, 5000, 5001
OFFSET
1,3
COMMENTS
If m belongs to this sequence, then A048385(m) belongs to this sequence.
If m belongs to this sequence, then 10*m and 10*m + 1 belong to this sequence.
This sequence contains A007088.
All terms belong to A052419.
Let U be the infinite word ...|A048385^2(16)|A048385(16)|16425 and V be the infinite word ...|A048385^2(81)|A048385(81)|81936. The terms of this sequence consist of the last x digits of either U or V followed by y digits in {0,1}, where x and y are nonnegative integers. - Charlie Neder, May 17 2019
EXAMPLE
The first terms, alongside A048385(a(n)), are:
n a(n) A048385(a(n))
-- ---- -------------
1 0 0
2 1 1
3 5 25
4 6 36
5 10 10
6 11 11
7 25 425
8 36 936
9 50 250
10 51 251
11 60 360
12 61 361
PROG
(PARI) See Links section.
(MATLAB) m=1;
for u=0:5001
digit=dec2base(u, 10)-'0'; digitp=digit.^2;
aa=str2num(strrep(num2str(digitp), ' ', ''));
digitaa=dec2base(aa, 10)-'0';
if mod(aa, 10^length(digit))==u
sol(m)=u; m=m+1;
end
end
sol % Marius A. Burtea, May 17 2019
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, May 17 2019
STATUS
approved