|
| |
|
|
A045808
|
|
8-ish numbers (end in 67, 69, 81, 83).
|
|
2
| |
|
|
67, 69, 81, 83, 167, 169, 181, 183, 267, 269, 281, 283, 367, 369, 381, 383, 467, 469, 481, 483, 567, 569, 581, 583, 667, 669, 681, 683, 767, 769, 781, 783, 867, 869, 881, 883, 967, 969, 981, 983, 1067, 1069, 1081, 1083, 1167, 1169, 1181, 1183, 1267, 1269
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Reinhard Zumkeller, Table of n, a(n) for n = 1..1000
|
|
|
FORMULA
| Empirical G.f.: x*(67+2*x+12*x^2+2*x^3+17*x^4)/(1-x-x^4+x^5). [Colin Barker, Jan 23 2012]
|
|
|
PROG
| (Haskell)
import Data.List (findIndices)
a045808 n = a045808_list !! (n-1)
a045808_list = findIndices (`elem` [67, 69, 81, 83]) $ cycle [0..99]
-- Reinhard Zumkeller, Jan 23 2012
|
|
|
CROSSREFS
| Cf. A045800-A045809.
Cf. A045572, A045797, A045798.
Sequence in context: A145175 A196251 A169936 * A073523 A033243 A039432
Adjacent sequences: A045805 A045806 A045807 * A045809 A045810 A045811
|
|
|
KEYWORD
| nonn,base,easy
|
|
|
AUTHOR
| J. H. Conway.
|
|
|
EXTENSIONS
| More terms from Erich Friedman (erich.friedman(AT)stetson.edu).
|
| |
|
|
