login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A179802 Digital root of A179545. 1
3, 9, 3, 9, 3, 9, 3, 9, 3, 3, 9, 9, 3, 9, 3, 3, 3, 9, 9, 3, 9, 9, 3, 3, 9, 3, 9, 3, 9, 3, 9, 3, 3, 9, 3, 9, 9, 9, 3, 3, 3, 9, 3, 9, 3, 9, 9, 9, 3, 9, 3, 3, 9, 3, 3, 3, 3, 9, 9, 3, 9, 3, 9, 3, 9, 3, 9, 9, 3, 9, 3, 3, 9, 9, 9, 3, 3, 9, 3, 9, 3, 9, 3, 9, 9, 3, 3 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Because every term in A179545 is a multiple of 3, each term of this sequence is 3 or 9. - Nathaniel Johnston, May 04 2011
a(n) = 3 if and only if prime(n) == 2 (mod 3); otherwise a(n) = 9. - Charles R Greathouse IV, May 19 2011
LINKS
FORMULA
a(n) = A010888(A179545(n)). - Michel Marcus, Mar 08 2022
MAPLE
read("transforms") ; A010888 :=proc(n) local a; a := digsum(n) ; if a > 9 then return procname(a) ; else return a; end if; end proc:
A179545 := proc(n) local p; p := ithprime(n); 3*p*(p-1)/2 ; end proc:
A179802 := proc(n) A010888(A179545(n)) ; end proc:
seq(A179802(n), n=1..180) ; # R. J. Mathar, Oct 03 2010
PROG
(PARI) apply(p->if(p%3==2, 3, 9), primes(10000)) \\ Charles R Greathouse IV, May 19 2011
CROSSREFS
Sequence in context: A099319 A231828 A268580 * A010707 A097665 A284564
KEYWORD
easy,nonn,base
AUTHOR
Odimar Fabeny, Jul 27 2010
EXTENSIONS
More terms from R. J. Mathar, Oct 03 2010
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 20 17:24 EDT 2024. Contains 374459 sequences. (Running on oeis4.)