A060110 Numbers in Morse code, with 1 for a dot, 2 for a dash and 0 between digits/letters and then converted from base 3 to base 10.
242, 161, 134, 125, 122, 121, 202, 229, 238, 241, 117611, 117530, 117503, 117494, 117491, 117490, 117571, 117598, 117607, 117610, 97928, 97847, 97820, 97811, 97808, 97807, 97888, 97915, 97924, 97927, 91367, 91286, 91259, 91250, 91247
Offset: 0
Examples
a(10) = 12222022222[base 3] = 117611[base 10] since 1 is ".----" and 0 is "-----".
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
Programs
-
Haskell
a060110 = t . a060109 where t 0 = 0 t n = if n == 0 then 0 else 3 * t n' + d where (n', d) = divMod n 10 -- Reinhard Zumkeller, Feb 20 2015
-
PARI
apply( {A060110(n)=if(n>9, self()(n\10)*3^6)+fromdigits([1+(abs(k-n%10)>2)|k<-[3..7]],3)}, [0..39]) \\ M. F. Hasler, Jun 23 2020
Comments