VOOZH about

URL: https://oeis.org/A389122

⇱ A389122 - OEIS


login
A389122
Upper (2/3)-midsequence of A000032 (Lucas numbers) and A000045 (Fibonacci numbers); see Comments.
2
2, 2, 3, 4, 7, 11, 18, 28, 46, 74, 119, 192, 311, 503, 814, 1316, 2130, 3446, 5575, 9020, 14595, 23615, 38210, 61824, 100034, 161858, 261891, 423748, 685639, 1109387, 1795026, 2904412, 4699438, 7603850, 12303287, 19907136, 32210423, 52117559, 84327982
OFFSET
0,1
COMMENTS
Suppose that s = (s(n)) and t = (t(n)) are sequences of numbers and r > 0. The lower (r)-midsequence of s and t is given by u = floor(r*(s + t)); the upper r-midsequence of s and t is given by v = ceiling(r*(s + t)). If s and t are linearly recurrent and r is rational, then u and v are linearly recurrent.
FORMULA
a(n) = ceiling((2/3)*(A000032(n) + A000045(n))).
a(n) = a(n-1) + a(n-2) + a(n-8) - a(n-9) - a(n-10).
EXAMPLE
s = (F(n)) = (0, 1, 1, 2, 3, 5, 8, ...); t = (2, 1, 3, 4, 7, 11, 18, ...).
u(n) = floor((2/3)(0+2, 1+1, 1+3, 2+4, 3+7, ...)) = (1, 1, 2, 4, 6, ...).
v(n) = ceiling((2/3)(0+2, 1+1, 1+3, 2+4, 3+7, ...)) = (2, 2, 3, 4, 7, ...).
MATHEMATICA
s[n_] := Fibonacci[n]; t[n_] := LucasL[n]; r = 2/3;
u[n_] := Floor[r*(s[n] + t[n])]
v[n_] := Ceiling[r*(s[n] + t[n])]
Table[u[n], {n, 0, 30}] (* A389121 *)
Table[v[n], {n, 0, 30}] (* A389122 *)
PROG
(Python)
from sympy import lucas, fibonacci
def A389122(n): return ((lucas(n)+fibonacci(n)<<1)-1)//3+1 # Chai Wah Wu, Oct 08 2025
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Oct 03 2025
STATUS
approved