[go: up one dir, main page]

login
A000870
Numbers beginning with letter 's' in English.
6
6, 7, 16, 17, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 600, 601, 602, 603, 604, 605, 606, 607, 608, 609, 610, 611, 612, 613, 614, 615, 616, 617, 618, 619, 620
OFFSET
1,1
MATHEMATICA
Select[Range[10^3], Function[d, Or[And[Mod[IntegerLength@ #, 3] == 2, MemberQ[{16, 17}, FromDigits@ Take[d, 2]]], MemberQ[{6, 7}, First@ d]]]@ IntegerDigits@ # &] (* Michael De Vlieger, Feb 13 2017 *)
CROSSREFS
Subsequence of A125299.
Sequence in context: A315843 A261195 A008538 * A315844 A308903 A315845
KEYWORD
word,nonn
EXTENSIONS
Edited by John Cerkan, Feb 13 2017
STATUS
approved