login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A081829
Numbers n such that the n-th term of Hofstadter Q-sequence is > (n+1)-th term.
5
15, 24, 31, 35, 38, 48, 51, 52, 55, 57, 63, 64, 66, 67, 70, 73, 75, 77, 81, 84, 88, 96, 100, 103, 105, 109, 112, 115, 118, 119, 121, 124, 126, 127, 128, 130, 135, 138, 140, 141, 143, 144, 147, 149, 150, 152, 155, 158, 160, 162, 165, 168, 169, 171, 172, 174, 179
OFFSET
1,1
COMMENTS
A005185(a(n)+1) < A005185(a(n)); A081827(a(n)) < 0.
LINKS
FORMULA
Conjecture : a(n)/n>2 and a(n)/n->2
PROG
(Haskell)
import Data.List (findIndices)
a08182 n = a081829_list !! (n-1)
a081829_list = map (+ 1) $ findIndices (< 0) a081827_list
-- Reinhard Zumkeller, Sep 15 2011
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Apr 10 2003
STATUS
approved