A101704
Numbers n such that reversal(n)=2n/3.
Original entry on oeis.org
0, 6534, 65934, 659934, 6599934, 65346534, 65999934, 653406534, 659999934, 6534006534, 6593465934, 6599999934, 65340006534, 65934065934, 65999999934, 653400006534, 653465346534, 659340065934, 659934659934, 659999999934, 6534000006534, 6534659346534, 6593400065934, 6599340659934, 6599999999934
Offset: 1
g(65934,3,4)=6593400065934000659340006593400065934 is in the sequence
because reversal(6593400065934000659340006593400065934)
= 4395600043956000439560004395600043956
=2/3*6593400065934000659340006593400065934.
A101705
Numbers n such that n = 12*reversal(n).
Original entry on oeis.org
0, 540, 5940, 54540, 59940, 540540, 599940, 5400540, 5454540, 5945940, 5999940, 54000540, 54594540, 59405940, 59999940, 540000540, 540540540, 545454540, 545994540, 594005940, 594545940, 599459940, 599999940, 5400000540, 5405940540, 5454054540, 5459994540, 5940005940, 5945945940, 5994059940, 5999999940
Offset: 1
g(540,0,5)= (540)(6) = 540540540540540540 is in the sequence because reversal(540540540540540540) = 45045045045045045 and 12*45045045045045045 = 540540540540540540.
-
Do[If[n == 12*FromDigits[Reverse[IntegerDigits[n]]], Print[n]], {n, 0, 6000000000, 60}]
Select[Range[0,6*10^9,60],#==12IntegerReverse[#]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 12 2017 *)
-
def A101705(n):
if n == 1: return 0
a = 1<Chai Wah Wu, Jul 23 2024
A102277
Numbers n such that n = 15*reversal(n).
Original entry on oeis.org
0, 65340, 659340, 6599340, 65999340, 653465340, 659999340, 6534065340, 6599999340, 65340065340, 65934659340, 65999999340, 653400065340, 659340659340, 659999999340, 6534000065340, 6534653465340, 6593400659340, 6599346599340, 6599999999340
Offset: 1
g(65340,0,2)= (65340)(3) = 653406534065340 is in the sequence because reversal(653406534065340) = 43560435604356 = (1/15)*653406534065340.
-
Do[If[n == 15*FromDigits[Reverse[IntegerDigits[n]]], Print[n]], {n, 0, 11000000000, 30}]
A285040
Numbers n such that three-halves of n equals the reverse of n.
Original entry on oeis.org
4356, 43956, 439956, 4399956, 43564356, 43999956, 435604356, 439999956, 4356004356, 4395643956, 4399999956, 43560004356, 43956043956, 43999999956, 435600004356, 435643564356, 439560043956, 439956439956, 439999999956
Offset: 1
439956 times 3/2 equals 659934 which is the reverse of 439956.
- David Wells, The Penguin Dictionary of Curious and Interesting Numbers (Rev. ed. 1997), p. 158.
-
Select[2 Range[10^7], 3(#/2) == FromDigits@ Reverse@ IntegerDigits@ # &] (* Giovanni Resta, Apr 08 2017 *)
-
isok(n) = 3*n/2 == fromdigits(Vecrev(digits(n))); \\ Michel Marcus, Apr 09 2017
Showing 1-4 of 4 results.
Comments