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 A047336 #66 Nov 22 2024 06:28:31
%S A047336 1,6,8,13,15,20,22,27,29,34,36,41,43,48,50,55,57,62,64,69,71,76,78,83,
%T A047336 85,90,92,97,99,104,106,111,113,118,120,125,127,132,134,139,141,146,
%U A047336 148,153,155,160,162,167,169,174,176,181,183,188,190,195,197,202,204,209
%N A047336 Numbers that are congruent to {1, 6} mod 7.
%C A047336 Cf. property described by Gary Detlefs in A113801: more generally, these numbers are of the form (2*h*n+(h-4)*(-1)^n-h)/4 (h, n natural numbers), therefore ((2*h*n+(h-4)*(-1)^n-h)/4)^2-1 == 0 (mod h); in this case, a(n)^2-1 == 0 (mod 7). - _Bruno Berselli_, Nov 17 2010
%H A047336 Reinhard Zumkeller, <a href="/A047336/b047336.txt">Table of n, a(n) for n = 1..10000</a>
%H A047336 <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,-1).
%F A047336 a(1) = 1; a(n) = 7(n-1) - a(n-1). - _Rolf Pleisch_, Jan 31 2008 (corrected by _Jon E. Schoenfield_, Dec 22 2008)
%F A047336 a(n) = (7/2)*(n-(1-(-1)^n)/2) - (-1)^n. - _Rolf Pleisch_, Nov 02 2010
%F A047336 From _Bruno Berselli_, Nov 17 2010: (Start)
%F A047336 G.f.: x*(1+5*x+x^2)/((1+x)*(1-x)^2).
%F A047336 a(n) = -a(-n+1) = a(n-1) + a(n-2) - a(n-3).
%F A047336 a(n) = a(n-2)+7.
%F A047336 a(n) = 7*A000217(n-1)+1 - 2*Sum_{i=1..n-1} a(i) for n > 1. (End)
%F A047336 a(n) = 7*floor(n/2)+(-1)^(n+1). - _Gary Detlefs_, Dec 29 2011
%F A047336 Sum_{n>=1} (-1)^(n+1)/a(n) = (Pi/7)*cot(Pi/7) = A019674 * A178818. - _Amiram Eldar_, Dec 04 2021
%F A047336 E.g.f.: 1 + ((14*x - 7)*exp(x) + 3*exp(-x))/4. - _David Lovler_, Sep 01 2022
%F A047336 From _Amiram Eldar_, Nov 22 2024: (Start)
%F A047336 Product_{n>=1} (1 - (-1)^n/a(n)) = 2*cos(Pi/7) (A160389).
%F A047336 Product_{n>=2} (1 + (-1)^n/a(n)) = (Pi/7) * cosec(Pi/7) (A371858). (End)
%t A047336 Rest[Flatten[Table[{7i-1,7i+1},{i,0,40}]]] (* _Harvey P. Dale_, Nov 20 2010 *)
%o A047336 (Magma) [n: n in [1..210]| n mod 7 in {1,6}]; // _Bruno Berselli_, Feb 22 2011
%o A047336 (Haskell)
%o A047336 a047336 n = a047336_list !! (n-1)
%o A047336 a047336_list = 1 : 6 : map (+ 7) a047336_list
%o A047336 -- _Reinhard Zumkeller_, Jan 07 2012
%o A047336 (PARI) a(n)=n\2*7-(-1)^n \\ _Charles R Greathouse IV_, May 02 2016
%Y A047336 Cf. A007310, A019674, A047522, A045472 (primes), A195041 (partial sums), A005408, A047209, A056020, A090771, A091998, A113801, A160389, A175885, A175886, A175887, A178818, A371858.
%K A047336 nonn,easy
%O A047336 1,2
%A A047336 _N. J. A. Sloane_
%E A047336 More terms from _Jon E. Schoenfield_, Jan 18 2009