OFFSET
1,1
LINKS
Peter Dolland, Table of n, a(n) for n = 1..200
PROG
(Haskell)
twinLowX [] = []
twinLowX [_] = []
twinLowX (n : (m : ns))
| m == n + 1 = 1 : (map succ (twinLowX (m : ns)))
| otherwise = (map succ (twinLowX (m : ns)))
a308339 n = (twinLowX a007304_list) !! (n - 1)
-- Peter Dolland, May 31 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Dolland, May 20 2019
STATUS
approved