login
A168224
Where record values occur in A168223.
3
0, 5, 7, 11, 17, 19, 23, 29, 31, 35, 41, 43, 47, 53, 55, 59, 65, 67, 71, 77, 79, 83, 89, 91, 95, 101, 103, 107, 113, 115, 119, 125, 127, 131, 137, 139, 143, 149, 151, 155, 161, 163, 167, 173, 175, 179, 185, 187, 191, 197, 199, 203, 209, 211, 215, 221, 223, 227, 233
OFFSET
1,2
COMMENTS
A168223(a(n))=A047342(n) and A168223(m) < A047342(n) for m<a(n).
LINKS
MATHEMATICA
With[{nn=300}, DeleteDuplicates[Thread[{Range[0, nn-1], LinearRecurrence[{-2, -2, 0, 3, 4, 3, 0, -2, -2, -1}, {0, 0, 0, 0, -1, 3, -5, 4, -1, -1}, nn]}], GreaterEqual[#1[[2]], #2[[2]]]&]][[;; , 1]] (* Harvey P. Dale, Mar 01 2024 *)
CROSSREFS
Sequence in context: A107448 A147853 A111226 * A084197 A180952 A073681
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Nov 20 2009
STATUS
approved