|
Search: id:A135013
|
|
| |
|
| 1, 2, 5, 6, 11, 14, 21, 22, 31, 36, 47, 50, 63, 70, 85, 86, 103, 112, 131, 136, 157, 168, 191, 194, 219, 232, 259, 266, 295, 310, 341, 342, 375, 392, 427, 436, 473, 492, 531, 536, 577, 598, 641, 652, 697, 720, 767, 770, 819, 844, 895, 908, 961, 988, 1043, 1050, 1107, 1136
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
a(n) is also the number of elements in the set {(x,y): 1<=x,y<=n, the fraction x/y reduces to a fraction of the form (odd#)/(odd#)}. [From Adam McDougall (mcdougall.adam(AT)gmail.com), Feb 20 2009]
|
|
PROGRAM
|
Contribution from Gerald Hillier (adr.rabbicat(AT)gmail.com), May 02 2009, May 18 2009:
(HP 50G Calculator) IDIV2 returns quotient & remainder to stack.
<< 0 SWAP
WHILE DUP 0 >
REPEAT 2 IDIV2 OVER + SQ ROT + SWAP
END DROP >>
|
|
CROSSREFS
|
Cf. A000918, A000265, A135014.
Sequence in context: A090552 A024520 A015613 this_sequence A103035 A088273 A049054
Adjacent sequences: A135010 A135011 A135012 this_sequence A135014 A135015 A135016
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com), Feb 10 2008
|
|
EXTENSIONS
|
Added > (greater than sign) after "WHILE DUP 0" to produce correct programme Gerald Hillier (adr.rabbicat(AT)gmail.com), Aug 01 2009
|
|
|
Search completed in 0.002 seconds
|
