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 A070246 #6 Mar 18 2018 04:04:45 %S A070246 1,1,1,1,1,1,1,1,1,10,1,28,403,574,85,976,1207,18,1729,10,28,1,736,28, %T A070246 1300,403,24,574,2668,10,403,736,1,1462,1855,28,2701,3154,403,10,574, %U A070246 28,1462,1,30,736,3478,28,4606,10,85,1300,1855,30,1,3640,475,4930,5605 %N A070246 a(n) = lcm(n, R(n)) / gcd(n, R(n)), where R(n) (A004086) is the digit reversal of n. %C A070246 a(1) = 1, a(18) = 18. Are there more terms for which a(k) = k? %e A070246 a(12) = lcm(12,21)/gcd(12,21) = 84/3 = 28. %t A070246 r[n_] := FromDigits[ Reverse[ IntegerDigits[n]]]; Table[ LCM[n, r[n]] / GCD[n, r[n]], {n, 1, 65}] %K A070246 base,nonn %O A070246 1,10 %A A070246 _Amarnath Murthy_, May 09 2002 %E A070246 Edited by _Robert G. Wilson v_, May 10 2002