|
|
A044371
|
|
Numbers n such that string 3,9 occurs in the base 10 representation of n but not of n-1.
|
|
0
|
|
|
39, 139, 239, 339, 390, 439, 539, 639, 739, 839, 939, 1039, 1139, 1239, 1339, 1390, 1439, 1539, 1639, 1739, 1839, 1939, 2039, 2139, 2239, 2339, 2390, 2439, 2539, 2639, 2739, 2839, 2939, 3039, 3139, 3239, 3339, 3390, 3439
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Table of n, a(n) for n=1..39.
|
|
MATHEMATICA
|
Transpose[SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {3, 9}]>0, 1, 0], {n, 3500}], {0, 1}]][[2]] (* The program uses the SequencePosition and SequenceCount functions from Mathematica version 10 *) (* Harvey P. Dale, Jun 03 2015 *)
|
|
CROSSREFS
|
Sequence in context: A082656 A072933 A118634 * A044752 A072253 A128826
Adjacent sequences: A044368 A044369 A044370 * A044372 A044373 A044374
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Clark Kimberling
|
|
STATUS
|
approved
|
|
|
|