This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A061085 #8 Aug 04 2015 23:36:46 %S A061085 4,8,12,16,170,204,238,272,306,340,374,408,442,476,510,544,578,612, %T A061085 646,680,714,748,782,816,850,884,918,952,986,1020,1054,1088,1122,1156, %U A061085 1190,1224,1258,1292,1326,1360,1394,1428,1462,1496,1530,1564,1598,1632,1666 %N A061085 a(n) = A019550(n) / 3. %H A061085 Amarnath Murthy, <a href="http://fs.gallup.unm.edu/MurthyBook.pdf">Some propositions on Smarandache n2n sequence</a>, Smarandache Notions Journal, Digital Library of Science, p 126 %H A061085 Felice Russo, <a href="http://fs.gallup.unm.edu/Felice-Russo-book1.pdf">A set of new Smarandache Functions, Sequences and conjectures in number theory</a>, Smarandache Notions Journal, Digital Library of Science, (2000) %F A061085 a(n) = one-third of the number obtained by concatenating n with 2n. %e A061085 a(8) = 272 = 816/3, where 816 is 8 concatenated with 16. %p A061085 cat2 := proc(a,b) dgsb := max(1,ilog10(b)+1) ; a*10^dgsb+b ; end proc: %p A061085 A019550 := proc(n) cat2(n,2*n) ; end proc: %p A061085 A061085 := proc(n) A019550(n)/3 ; end proc: seq(A061085(n),n=1..80) ; # _R. J. Mathar_, Oct 10 2010 %t A061085 Table[FromDigits[Join[IntegerDigits[n],IntegerDigits[2n]]]/3,{n,50}] (* _Harvey P. Dale_, Aug 18 2012 *) %Y A061085 Cf. A019550. %K A061085 nonn,base %O A061085 1,1 %A A061085 _Amarnath Murthy_, Apr 19 2001 %E A061085 Offset corrected and sequence extended by _R. J. Mathar_, Oct 10 2010