This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A094970 #19 Sep 08 2022 08:45:13
%S A094970 1,3,12,42,150,525,1838,6433,22518,78815,275854,965491,3379220,
%T A094970 11827271,41395451,144884079,507094277,1774829971,6211904899,
%U A094970 21741667147,76095835015,266335422555,932173978944,3262608926305,11419131242070,39966959347247,139884357715364,489595252003776
%N A094970 a(n) = floor(7^n/2^n).
%H A094970 Vincenzo Librandi, <a href="/A094970/b094970.txt">Table of n, a(n) for n = 0..1000</a>
%F A094970 7^n = a(n)*2^n + A138616(n). - _R. J. Mathar_, Oct 26 2012
%t A094970 Table[ Floor[(7/2)^n], {n, 0, 30}]
%o A094970 (Magma) [Floor(7^n / 2^n): n in [0..30]]; // _Vincenzo Librandi_, Sep 08 2011
%o A094970 (Maxima) A094970(n):=floor(7^n/2^n)$ makelist(A094970(n),n,0,30); /* _Martin Ettl_, Oct 25 2012 */
%o A094970 (PARI) a(n)=7^n>>n \\ _Charles R Greathouse IV_, Feb 04 2016
%Y A094970 Cf. A002379, A094969-A094999.
%K A094970 nonn,easy
%O A094970 0,2
%A A094970 _Robert G. Wilson v_, May 26 2004