%I #20 Apr 06 2021 04:53:10
%S 9,18,27,36,45,54,63,520,585,650,715,780,845,910,975,1040,1105,1170,
%T 1235,1300,1365,1430,1495,1560,1625,1690,1755,1820,1885,1950,2015,
%U 2080,2145,2210,2275,2340,2405,2470,2535,2600,2665,2730,2795,2860,2925,2990,3055
%N Numbers whose base-8 representation is the juxtaposition of two identical strings.
%H Amiram Eldar, <a href="/A020336/b020336.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = n*8^floor(log_8(n)+1) + n. - _Ilya Gutkovskiy_, Jan 26 2018
%e 650_10 = 1212_8. - _Jon E. Schoenfield_, Feb 12 2021
%t a[n_] := n + n*8^Floor[Log[8, n] + 1]; Array[a, 50] (* _Amiram Eldar_, Apr 06 2021 *)
%Y Cf. A020330, A020331, A020332, A020333, A020334, A020335, A020337, A020338.
%K nonn,base
%O 1,1
%A _David W. Wilson_, Melia Aldridge (ma38(AT)spruce.evansville.edu)
|