# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a083447
Showing 1-1 of 1

%I A083447 #19 May 28 2021 13:43:41
%S A083447 1,1,2,2,3,3,4,4,0,5,7,9,10,11,12,13,14,15,1,7,11,13,15,16,18,19,20,
%T A083447 22,2,9,13,16,18,21,22,24,26,27,3,10,15,18,22,24,26,28,30,32,4,11,16,
%U A083447 21,24,27,30,32,34,36,5,12,18,22,26,30,33,35,37,40,6,13,19,24,28,32,35,38,41
%N A083447 a(n) = floor( n*R(n)/(n+R(n))), where R(n) is the digit reversal of n (A004086).
%H A083447 Vincenzo Librandi, <a href="/A083447/b083447.txt">Table of n, a(n) for n = 2..1000</a>
%e A083447 a(17) = floor(17*71/(17+71)) = floor(1207/88) = 13.
%t A083447 drev[n_]:=Module[{dr=FromDigits[Reverse[IntegerDigits[n]]]},Floor[ (dr*n)/ (dr+n)]]; Array[drev,80,2] (* _Harvey P. Dale_, Apr 26 2014 *)
%Y A083447 Cf. A004086.
%K A083447 base,easy,nonn
%O A083447 2,3
%A A083447 _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 01 2003
%E A083447 More terms from _Jason Earls_, May 23 2004

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE