[go: up one dir, main page]

login
A064514
Write A064476(n) = 2^i(n)*3^j(n); sequence gives values of i(n).
3
0, 1, 2, 2, 3, 4, 3, 4, 5, 4, 6, 5, 6, 5, 7, 6, 8, 7, 6, 8, 7, 9, 8, 10, 7, 9, 8, 10, 9, 11, 8, 10, 12, 9, 11, 10, 12, 9, 11, 13, 10, 12, 14, 11, 13, 10, 12, 14, 11, 13, 15, 12, 14, 11, 16, 13, 15, 12, 14, 16, 13, 15, 12, 17, 14, 16, 13, 18, 15, 17, 14, 16, 13, 18, 15, 17, 14, 19, 16
OFFSET
1,3
PROG
(ARIBAS): function a064514(maxarg: integer); var j: integer; ar: array; begin ar := p2p3(maxarg); for j := 0 to maxarg - 1 do write(ar[j][1], " "); end; end; a064514(85). For definition of function p2p3 see A064476.
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladeta Jovovic, Oct 07 2001, Oct 07 2001
EXTENSIONS
More terms from Klaus Brockhaus, Oct 12 2001
STATUS
approved