|
| |
|
|
A044140
|
|
Numbers n such that string 0,2 occurs in the base 7 representation of n but not of n-1.
|
|
0
| |
|
|
51, 100, 149, 198, 247, 296, 345, 357, 394, 443, 492, 541, 590, 639, 688, 700, 737, 786, 835, 884, 933, 982, 1031, 1043, 1080, 1129, 1178, 1227, 1276, 1325, 1374, 1386, 1423, 1472, 1521, 1570, 1619, 1668, 1717, 1729, 1766, 1815
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| okQ[n_]:=MemberQ[Partition[IntegerDigits[n, 7], 2, 1], {0, 2}] && !MemberQ[Partition[IntegerDigits[n-1, 7], 2, 1], {0, 2}]; Select[Range[2000], okQ] [From Harvey P. Dale, Feb 02 2011]
|
|
|
CROSSREFS
| Sequence in context: A020180 A049328 A075894 * A044521 A160847 A015705
Adjacent sequences: A044137 A044138 A044139 * A044141 A044142 A044143
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|
