OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
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
KEYWORD
nonn
AUTHOR
STATUS
approved