|
| |
|
|
A031288
|
|
Position of n-th 1 in A007376.
|
|
12
| |
|
|
1, 10, 12, 13, 14, 16, 18, 20, 22, 24, 26, 28, 33, 53, 73, 93, 113, 133, 153, 173, 190, 193, 195, 196, 199, 202, 205, 208, 211, 214, 217, 220, 221, 223, 224, 225, 226, 227, 229, 230, 232, 233, 235, 236, 238, 239, 241, 242, 244, 245
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| A007376(a(n)) = 1;
a(n) = Min{A031287(n), A031288(n), A031289(n), A031290(n), A031291(n), A031292(n), A031293(n), A031294(n), A031295(n), A031296(n)}. [Reinhard Zumkeller, Jul 28 2011]
|
|
|
LINKS
| Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
|
|
|
PROG
| (Haskell)
import Data.List (elemIndices)
a031288 n = a031288_list !! (n-1)
a031288_list = map (+ 1) $ elemIndices 1 a007376_list
-- Reinhard Zumkeller, Jul 28 2011
|
|
|
CROSSREFS
| Cf. A193428.
Sequence in context: A065206 A083476 A124404 * A127957 A079026 A124867
Adjacent sequences: A031285 A031286 A031287 * A031289 A031290 A031291
|
|
|
KEYWORD
| nonn,less,base
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu)
|
| |
|
|
