|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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.
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
|
|
LINKS
|
|
|
EXAMPLE
|
The first terms, alongside A048385(a(n)), are:
-- ---- -------------
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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|