OFFSET
1,2
COMMENTS
See A370823 for more information.
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..1000
FORMULA
Denominator of 2^(n-1)*(3^n-1)/(3^n-2^n). - Chai Wah Wu, Mar 07 2024
EXAMPLE
A370823(n)/a(n) for n = 1..11: 2/1, 16/5, 104/19, 128/13, 3872/211, 3328/95, 139904/2059, 167936/1261, 5038592/19171, 2748416/5275, 7886848/7613.
MATHEMATICA
Array[Denominator[(3^#-1)/((3/2)^#-1)/2] &, 35] (* Paolo Xausa, Mar 13 2024 *)
PROG
(PARI) \\ See A370823 for functions a370823_4(n)
denominator(a370823_4(n))
(Python)
from math import gcd
def A370824(n): return (a:=3**n-(1<<n))//gcd(a, 3**n-1<<n-1) # Chai Wah Wu, Mar 07 2024
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Hugo Pfoertner, Mar 02 2024
STATUS
approved