login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A056020 Numbers n that are congruent to +-1 mod 9. 24
1, 8, 10, 17, 19, 26, 28, 35, 37, 44, 46, 53, 55, 62, 64, 71, 73, 80, 82, 89, 91, 98, 100, 107, 109, 116, 118, 125, 127, 134, 136, 143, 145, 152, 154, 161, 163, 170, 172, 179, 181, 188, 190, 197, 199, 206, 208, 215, 217, 224, 226, 233, 235, 242, 244, 251, 253 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Or, numbers n such that n^2 == 1 (mod 9).

Or, numbers n such that the iterative cycle k -> sum of digits of k^2 when started at n contains a 1. E.g. 8 -> 6+4 = 10 -> 1+0+0 = 1 and 17 -> 2+8+9 = 19 -> 3+6+1 = 10 -> 1+0+0 = 1. - Asher Auel (asher.auel(AT)reed.edu), May 17 2001

LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

Index entries for linear recurrences with constant coefficients, signature (1,1,-1).

FORMULA

a(1) = 1; a(n) = 9(n-1) - a(n-1) - Rolf Pleisch, Jan 31 2008 [Offset corrected by Jon E. Schoenfield, Dec 22 2008]

O.g.f.: 1+5/[4(x+1)]+27/[4(-1+x)]+9/[2(-1+x)^2] . a(n+1)-a(n) = A010697(n). - R. J. Mathar, Feb 10 2008

a(n) =(9* A132355(n) +1)^(1/2) [From Gary Detlefs, Feb 22 2010]

a(n)=(1/4)*(-9+5*(-1)^n+18*n) [From Paolo P. Lava, Apr 26 2010]

a(n) = a(n-2)+9, for n>2. a(n) = 9*A000217(n-1)+1 - 2*sum[i=1..n-1] a(i), n>1. -- Bruno Berselli, Nov 17 2010

MATHEMATICA

Select[ Range[ 300 ], PowerMod[ #, 2, 3^2 ]==1& ]

PROG

(PARI) a(n)=9*(n>>1)+if(n%2, 1, -1) \\ Charles R Greathouse IV, Jun 29 2011

(PARI) for(n=1, 40, print1(9*n-8, ", ", 9*n-1, ", ")) \\ Charles R Greathouse IV, Jun 29 2011

(Haskell)

a056020 n = a056020_list !! (n-1)

a05602_list = 1 : 8 : map (+ 9) a056020_list

-- Reinhard Zumkeller, Jan 07 2012

CROSSREFS

Cf. A007953, A047522 (n=1 or 7 mod 8), A090771 (n=1 or 9 mod 10).

Cf. A129805 (primes), A195042 (partial sums).

Cf. A005408, A047209, A007310, A047336, A175885, A091998, A175886, A113801, A175887.

Sequence in context: A228072 A038209 A061908 * A049510 A121846 A059094

Adjacent sequences:  A056017 A056018 A056019 * A056021 A056022 A056023

KEYWORD

nonn,easy

AUTHOR

Robert G. Wilson v, Jun 08 2000

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified July 25 04:48 EDT 2017. Contains 289779 sequences.