login
A093544
Numerator of (4n-3)/A000265(n). Numerator of pairwise quotients of A004130.
3
1, 5, 3, 13, 17, 7, 25, 29, 11, 37, 41, 15, 49, 53, 19, 61, 65, 23, 73, 77, 27, 85, 89, 31, 97, 101, 35, 109, 113, 39, 121, 125, 43, 133, 137, 47, 145, 149, 51, 157, 161, 55, 169, 173, 59, 181, 185, 63, 193, 197, 67, 205, 209, 71, 217, 221, 75, 229, 233, 79, 241
OFFSET
1,2
COMMENTS
Terms are a rearrangement of the odd numbers not of form 12k+9.
Also given by the following linear quasi-polynomial mod 3: (4 n - 3) If[Mod[n, 3] == 0, 1/3, 1]. [From Eric Rowland, Feb 24 2009]
LINKS
MATHEMATICA
Table[(4 n - 3) If[Mod[n, 3] == 0, 1/3, 1], {n, 50}] [From Eric Rowland, Feb 24 2009]
PROG
(PARI) a(n)=numerator((4*n-3)/n*2^valuation(n, 2))
CROSSREFS
Sequence in context: A358440 A280818 A085910 * A082983 A083594 A178497
KEYWORD
nonn
AUTHOR
Ralf Stephan, Mar 31 2004
STATUS
approved