OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
FORMULA
Sum_{n>=1} 1/a(n) = 1/3. - Amiram Eldar, Mar 29 2025
MAPLE
N:= 10^6: # for terms <= N
sort([seq(seq(2^i * 3^j, j = 1 .. ilog[3](N/2^i)), i=1..ilog2(N/3), 2)]); # Robert Israel, Oct 14 2024
MATHEMATICA
With[{max = 2*10^5}, Flatten[Table[2^(2*i-1)*3^j, {i, 1, (Log2[max]+1)/2}, {j, 1, Log[3, max/2^(2*i-1)]}]] // Sort] (* Amiram Eldar, Mar 29 2025 *)
PROG
(PARI) vecsort(vector(10000, n, 2^(2*((n-1)%100)+1)*3^((n\100)+1))) /* (first 100 values) */
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Ralf Stephan, Aug 10 2013
STATUS
approved
