A257263 - OEIS

A257263

Numbers such that the least missing nonzero digit (A257079) in their factorial base representation is 3.

5, 10, 11, 13, 14, 15, 17, 28, 29, 34, 35, 36, 37, 38, 39, 40, 41, 49, 50, 51, 53, 54, 55, 56, 57, 58, 59, 61, 62, 63, 65, 101, 106, 107, 109, 110, 111, 113, 124, 125, 130, 131, 132, 133, 134, 135, 136, 137, 148, 149, 154, 155, 156, 157, 158, 159, 160, 161, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 220

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Antti Karttunen, Table of n, a(n) for n = 1..10920

Index entries for sequences related to factorial base representation.

EXAMPLE

The factorial base representation (A007623) of 5 is "21", the least nonzero digit missing is 3, thus 5 is included.

The f.b.r. of 10 is "120", and likewise, 3 is the least missing digit, thus 10 is included.

The f.b.r. of 101 is "4021", where the least missing digit is 3, thus 101 is included in the sequence.

MATHEMATICA

q[n_] := Module[{k = n, m = 2, r, s = {}}, While[{k, r} = QuotientRemainder[k, m]; k != 0|| r != 0, AppendTo[s, r]; m++]; SubsetQ[s, {1, 2}] && !MemberQ[s, 3]]; Select[Range[220], q] (* Amiram Eldar, Feb 14 2024 *)

PROG

(Scheme, with Antti Karttunen's IntSeq-library)

(define A257263 (MATCHING-POS 1 0 (lambda (n) (= 3 (A257079 n)))))

CROSSREFS

Cf. A007623, A257079, A255411, A257262.

Subsequence of A256450.

Sequence in context: A106792 A232487 A243936 * A134002 A028760 A028807

Adjacent sequences: A257260 A257261 A257262 * A257264 A257265 A257266

KEYWORD

nonn,base

AUTHOR

Antti Karttunen, Apr 27 2015

STATUS

approved