|
| |
|
|
A191475
|
|
Values of i of the numbers 2^i*3^j (A033845).
|
|
5
|
|
|
|
1, 2, 1, 3, 2, 4, 1, 3, 5, 2, 4, 1, 6, 3, 5, 2, 7, 4, 1, 6, 3, 8, 5, 2, 7, 4, 1, 9, 6, 3, 8, 5, 2, 10, 7, 4, 1, 9, 6, 3, 11, 8, 5, 2, 10, 7, 4, 12, 1, 9, 6, 3, 11, 8, 5, 13, 2, 10, 7, 4, 12, 1, 9, 6, 14, 3, 11, 8, 5, 13, 2, 10, 7, 15, 4, 12, 1, 9, 6, 14, 3, 11
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
Not the same as A158456.
|
|
|
LINKS
|
Zak Seidov, Table of n, a(n) for n = 1..10000
|
|
|
EXAMPLE
|
a(10) = 2 because A033845(10) = 108 = 2^2*3^3.
a(100) = 2 because A033845(100) = 59872 = 2^8*3^7.
a(1000) = 56 because A033845(1000) = 216172782113783808 = 2^56*3^1.
|
|
|
MATHEMATICA
|
mx = 1000000; t = Select[Sort[Flatten[Table[2^i 3^j, {i, Log[2, mx]}, {j, Log[3, mx]}]]], # <= mx &]; Table[FactorInteger[i][[1, 2]], {i, t}] (* T. D. Noe, Aug 31 2012 *)
|
|
|
CROSSREFS
|
Cf. A033845 (numbers 2^i*3^j), A191476 (values of j), A158456.
Sequence in context: A336472 A058933 A087470 * A158456 A084531 A023129
Adjacent sequences: A191472 A191473 A191474 * A191476 A191477 A191478
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Zak Seidov, Aug 30 2012
|
|
|
STATUS
|
approved
|
| |
|
|
