[go: up one dir, main page]

login
A025718
Index of 6^n within sequence of numbers of form 6^i*9^j.
1
1, 2, 4, 7, 11, 16, 21, 27, 34, 42, 51, 60, 70, 81, 93, 106, 120, 134, 149, 165, 182, 200, 218, 237, 257, 278, 300, 323, 346, 370, 395, 421, 448, 475, 503, 532, 562, 593, 624, 656, 689, 723, 758, 794, 830, 867, 905, 944, 984, 1024, 1065, 1107, 1150, 1194, 1239, 1284
OFFSET
1,2
LINKS
MAPLE
with(priqueue):
initialize(PQ):
insert([-1, 0, 0], PQ):
count:= 0: R:= NULL:
for i from 1 while count < 100 do
v:= extract(PQ);
if v[3] = 0 then R:= R, i; count:= count+1; insert([v[1]*6, v[2]+1, 0], PQ);
insert([v[1]*9, v[2], v[3]+1], PQ)
od:
R; # Robert Israel, Jan 21 2024
CROSSREFS
Sequence in context: A067744 A307601 A194215 * A022783 A025708 A024673
KEYWORD
nonn
STATUS
approved