|
Search: id:A093544
|
|
| |
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
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 S Rowland (erowland(AT)math.rutgers.edu), Feb 24 2009]
|
|
MATHEMATICA
|
Table[(4 n - 3) If[Mod[n, 3] == 0, 1/3, 1], {n, 50}] [From Eric S Rowland (erowland(AT)math.rutgers.edu), Feb 24 2009]
|
|
PROGRAM
|
(PARI) a(n)=numerator((4*n-3)/n*2^valuation(n, 2))
|
|
CROSSREFS
|
Sequence in context: A083781 A080797 A085910 this_sequence A082983 A083594 A167583
Adjacent sequences: A093541 A093542 A093543 this_sequence A093545 A093546 A093547
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Ralf Stephan, Mar 31 2004
|
|
|
Search completed in 0.002 seconds
|
