A050016 -id:A050016 - cp's OEIS frontend

A050017 a(n) = position of n in A050016.

1, 4, 20, 3, 11, 19, 27, 35, 2, 10, 14, 18, 22, 26, 30, 34, 63, 5, 67, 9, 71, 13, 75, 17, 50, 204, 21, 54, 25, 383, 29, 87, 33, 437, 62, 37, 241, 66, 566, 8, 170, 70, 445, 620, 12, 174, 74, 424, 16, 699, 49, 203, 328, 428, 553, 53, 82, 24, 282, 382, 457, 582, 28

Offset: 1

Clark Kimberling

Cf. A050016.

A050018 Numbers k such that A050016(k) < A050016(k+1).

Original entry on oeis.org

1, 4, 5, 11, 14, 20, 22, 27, 30, 35, 37, 38, 44, 50, 54, 56, 63, 67, 71, 75, 77, 82, 87, 89, 91, 92, 101, 105, 110, 114, 118, 122, 125, 129, 134, 138, 142, 146, 151, 152, 161, 165, 170, 174, 175, 181, 184, 188, 192, 197, 204, 205, 210

Offset: 1

Clark Kimberling

A050019 Numbers k such that A050016(k) > A050016(k+1).

Original entry on oeis.org

2, 3, 6, 7, 8, 9, 10, 12, 13, 15, 16, 17, 18, 19, 21, 23, 24, 25, 26, 28, 29, 31, 32, 33, 34, 36, 39, 40, 41, 42, 43, 45, 46, 47, 48, 49, 51, 52, 53, 55, 57, 58, 59, 60, 61, 62, 64, 65, 66, 68, 69, 70, 72, 73, 74, 76, 78, 79, 80, 81, 83, 84

Offset: 1

Clark Kimberling

A050000 a(n) = floor(a(n-1)/2) if this is not among 0, a(1), ..., a(n-2); otherwise a(n) = 3*a(n-1).

Original entry on oeis.org

1, 3, 9, 4, 2, 6, 18, 54, 27, 13, 39, 19, 57, 28, 14, 7, 21, 10, 5, 15, 45, 22, 11, 33, 16, 8, 24, 12, 36, 108, 324, 162, 81, 40, 20, 60, 30, 90, 270, 135, 67, 201, 100, 50, 25, 75, 37, 111, 55, 165, 82, 41, 123, 61, 183, 91, 273, 136, 68

Offset: 1

Clark Kimberling

This permutation of the natural numbers is the multiply-and-divide (MD) sequence for (M,D)=(3,2). The "MD question" is this: for relatively prime M and D, does the MD sequence contain every positive integer exactly once? An affirmative proof for the more general condition that log base D of M is irrational is given by Mateusz Kwaśnicki in Crux Mathematicorum 30 (2004) 235-239. - Clark Kimberling, Jun 30 2004

T. D. Noe, Table of n, a(n) for n = 1..10000
Clark Kimberling, Unsolved Problems and Rewards.
Mateusz Kwaśnicki, The solution of M-D problem (2008).
Index entries for sequences that are permutations of the natural numbers

Cf. A050076, A050001 (inverse).
MD sequences:
A050076 (2,3), A050124 (2,5),
this sequence (3,2), A050104 (3,4),
A050080 (4,3),
A050004 (5,2), A050084 (5,3), A050108 (5,4),
A050008 (6,2), A050088 (6,3), A050112 (6,4),
A050012 (7,2), A050092 (7,3),
A050096 (8,3),
A050016 (9,2),
A050020 (10,2), A050100 (10,3).

a050000 n = a050000_list !! (n-1)
a050000_list = 1 : f [1,0] where
   f xs'@(x:xs) | x `div` 2 `elem` xs = 3 * x : f (3 * x : xs')
                | otherwise = x `div` 2 : f (x `div` 2 : xs')
-- Reinhard Zumkeller, Nov 13 2011

a[0] = 0; a[1] = 1; a[n_] := a[n] = (b = Floor[a[n-1]/2]; If[FreeQ[Table[ a[k], {k, 0, n-2}], b], b, 3*a[n-1]]);
Array[a, 60] (* Jean-François Alcover, Jul 13 2016 *)

cp's OEIS Frontend

A050017 a(n) = position of n in A050016.

Views

Author

Keywords

Crossrefs

A050018 Numbers k such that A050016(k) < A050016(k+1).

Views

Author

Keywords

A050019 Numbers k such that A050016(k) > A050016(k+1).

Views

Author

Keywords

A050000 a(n) = floor(a(n-1)/2) if this is not among 0, a(1), ..., a(n-2); otherwise a(n) = 3*a(n-1).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

Mathematica