|
|
A044055
|
|
Numbers n such that string 1,0 occurs in the base 3 representation of n but not of n-1.
|
|
1
|
|
|
3, 9, 21, 27, 48, 57, 63, 75, 81, 129, 138, 144, 156, 165, 171, 183, 189, 210, 219, 225, 237, 243, 372, 381, 387, 399, 408, 414, 426, 432, 453, 462, 468, 480, 489, 495, 507, 513, 534, 543, 549, 561, 567, 615, 624, 630, 642, 651
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 3], {1, 0}]>0, 1, 0], {n, 700}], {0, 1}][[All, 2]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jul 15 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|