cp's OEIS Frontend

A025718 Index of 6^n within sequence of numbers of form 6^i*9^j.

%I A025718 #13 Jul 06 2025 13:33:46
%S A025718 1,2,4,7,11,16,21,27,34,42,51,60,70,81,93,106,120,134,149,165,182,200,
%T A025718 218,237,257,278,300,323,346,370,395,421,448,475,503,532,562,593,624,
%U A025718 656,689,723,758,794,830,867,905,944,984,1024,1065,1107,1150,1194,1239,1284
%N A025718 Index of 6^n within sequence of numbers of form 6^i*9^j.
%C A025718 Positions of zeros in A025680. - _R. J. Mathar_, Jul 06 2025
%H A025718 Robert Israel, <a href="/A025718/b025718.txt">Table of n, a(n) for n = 1..10000</a>
%p A025718 with(priqueue):
%p A025718 initialize(PQ):
%p A025718 insert([-1,0,0],PQ):
%p A025718 count:= 0: R:= NULL:
%p A025718 for i from 1 while count < 100 do
%p A025718   v:= extract(PQ);
%p A025718 if v[3] = 0 then R:= R,i; count:= count+1; insert([v[1]*6,v[2]+1,0],PQ);
%p A025718 insert([v[1]*9, v[2], v[3]+1],PQ)
%p A025718 od:
%p A025718 R; # _Robert Israel_, Jan 21 2024
%Y A025718 Cf. A025628.
%K A025718 nonn
%O A025718 1,2
%A A025718 _David W. Wilson_